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MIT, HOGYAN, HOL, MIKOR? 

EGYESÜLETI ÜGYEK; Egyesületünk tagja lehet min¬ 
denki, aki a tagsági díjat befizeti. A tagdíjat személyesen az 
egyesületi irodájában (1132 Budapest, Visegrádi utca 38/a. II. 
em. Telefon: 12-95-048), vagy átutalással az MNB 217- 
98292, OTP 565-3610-8 számlára lehet befizetni. Megrende¬ 
lés esetén számlát küldünk. 

Minden tagunk rendelkezésre áll PÖTYÖGÖSZOLGÁ- 
LATUNK, a szervizkedvezmény és az apróhirdetési lehető¬ 
ség- 

A DEAKPAHOLY tagjai minden hónapban megkapják a 
C-újságot, a tagsági díj egy évre 666 forint. 

A PLUSZPAHOLY tagjai minden hónapban megkapják 
a C-újságot, és kapnak havonta 3 db vásárlási utalványt, 
összesen 320 Ft értékben. A tagsági díj egy évre 1777 Ft. 

A SZUPERPÁHOLY tagjai havonta 15 példányt kapnak 
a C-újságból, és ezzel havonta 15x3 db vásárlási utalványt is, 
össze.sen 4800 Ft értékben. Az éves tagsági díj 19 100 Ft. 

ÜGY FÉLFOGADÁS: minden kedden és csütörtökön 
14.30—18 óra között várjuk tagjainkat és az érdeklődőket. 

PÖTYÖGÖSZOLGAIAT: Az új.ságban megjelenő prog¬ 
ramokat másolja a megrendelők részére. Megrendelhető sze¬ 
mélyesen az egyesület irodájában vagy postai utánvéttel. 

1132 Budapest, Visegrádi utca 38/a. II. em. Telefon; 12- 
95-048 









APRÓHIRDETÉS: Az egyesületi tagoknak ingyen áll ren¬ 
delkezésére. Nem tagoknak a hirdetés ára 80 forint. A hirde¬ 
tés módja: az újságban megjelenő nyomtatvány kitöltésével. 

A C-újság régebbi számai megvásárolhatók az egyesület 
irodájában, vagy megrendelhetők utánvéttel. 

Kedvezményes ár! Tagoknak olcsóbb! 

Az újságban eddig megjelent programok gépenként össze¬ 
gyűjtve megrendelhetők. VC 20, Cl6, PLUS/4, Cl28, C64. 
További felvilágosítást is adunk a 12-95-048-as telefonszá¬ 
mon vagy levélben! 

Vidéki pluszpáholy-tagjaink háromhavi tikett összegyűj¬ 
tésekor igénybe vehetik a NOVOTRADE 2C Áruház 
csomagküldő szolgálatát. 

Vidéken további információk kaphatók; 

Jászberényi Városi Könyvtár 
Győri Bartók Béla Művelődési Ház 
Zalaegerszegi Ságvári Endre Gimnázium 
Pécsi Apáczai C^re János Gimnázium 


Az Országos Commodore Egyesület rrxSdszertanl kiadványa. 

Egyesületi Iroda és szerkesztőség; 

1132 Budapest, Visegrádi utca 38/a. II. em. Tel.: 12-96-048 

Felelős kiadó; Horváth Judit, az egyesület elnöke 

Főszerkesztő: Rados Péter, az OCE főtitkára 

Felelős szerkesztő: Dr. Horváth András 

Művészeti szerkesztő: Szulyovszky József 

Lapmenedzser: Kovács Gábor 

Levélcím: Commodore Újs^, 1388 Bp. 62. Pf. 86. 

Index: ISSN 0237-756 X 
Terjeszti a Magyar Posta. 

Me^ásárolható a hírlapárusoknál. 

MSZH Nyomda 


í-Y'ZS' I 

A kedvezmények a következő vidéki könyvesboltok 
2C sarkaiban válthatók be. 

PÉCS; Zrínyi Miklós Könyvesbolt, 7621 Jókai u. 25. Tel.: 
72-14988 

DEBRECEN: Szak- és Ismeretterjesztő Könyváruház, 
4024 Hunyadi u. 8. Tel.: 52-16091 
SZOMBATHELY: Savaria Könyvesbolt, 9700 Mártírok 
tere 1. Tel.: 94-12341 

VESZPRÉM: Kölcsey Ferenc Könyvesbolt, 8200 Cserhát 
út 7. 

BÉKÉSCSABA: Radnóti M. Könyvesbolt, 5600 Tanács- 
köztársaság út 2. Tel.: 66-25207 

GYŐR: Pattantyús Á. Géza Szakkönyvesbolt, 9022 Mol¬ 
nár Ferenc u. 9. Tel.: 96-22533 

SZEGED: Tömörkény Könyvesbolt, 6720 Lenin krt. 48. 
Tel.: 62-12418 

SZOLNOK: Szigligeti Könyvesbolt, 5000 Ságvári krt. 35. 
Tel.: 56-11133 

MISKOLC: 3515 Hunyadi út 15. Tel.; 46-18330 
KECSKEMÉT: Művelt Nép Könyvesbolt, 6000 Március 
15. u. 3—5. Tel.: 76-28157 


Egyesületi klubdélelőtt a Petőfi Csarnokban: 
1990. október 13. 

november 17. 


PÖTYÖGÖSZOLGÁLAT 

Helye: az egyesület Irodája 

Cím: 1132 Budapest, Visegrádi utca 38/A. II. em. 8. 

Telefon: 12-95-048 

Időpontok: október 9.. 10., 23., 24. 

november 6., 7., 20., 21. 
december 4., 5. 

A fenti napokon 15-től 19 óráig. 


Tisztelt Szerkesztőség! 

Nagy megrökönyödéssel olvastam a C- újság 1989/9. szá¬ 
mában a Tippek és trükkök kezdőknek című rovatban a DOS 
5.1 és a RÉSÉT című cikket. Ezt a bonyolult (kezdőknek!) 
műveletet a DOS 5.1 saját utasítás készletével is meg tudjuk 
oldani, így; 

@ # egységszám 

Tehát rését után így indítsuk a DOS 5.1-et: 

SYS 51224 

@#8 

Egy pár újabb trükk; programból is lehet kezelni a DIREC- 
TORY funkciót, így: 

10 @”$” 

így futtatáskor megjelenik a DIRECTORY a képernyőn. 
A betöltés is történhet egyszerűen: 

ha kinn van a DIRECTORY a képernyőn, a /,a|,a%, a «- 
úgy is működik, ha pl. ilyen formátumban adjuk meg a file- 
ncvct; 

í 32 "NEBULUS” PRG hatása: 

a NEBULUS nevű program betöltődik, és cl is indul. 

A DOS 5.1, mivel nem írja felül a LOAD-SAVE rutinokat, 
gyorstöltővel kombinálva is működik, feltéve, ha nem írja fe¬ 
lül egyik a másikat. 

Tisztelettel: 

Smolong Edvin 
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A számítógépek BASIC nyelvű programozásában gyakran 
előfordul, hogy több, ismert adatot akarunk használni, de a 
használat során nincs szükségünk minden adathoz külön vál¬ 
tozóra. Ilyen eset például az, amikor egy ^pi kódú prograin- 
részt a BASIC programból írunk be (POtó utasításokkal), és 
innen is indítjuk. Ezzel a módszerrel már az újságban is több¬ 
ször találkozhattak. Ekkor használjuk a programban való 
adattárolásra a DATA-READ-RESTORE utasításokat. 
DATA 

Ez az utasítás a programban való adattárolást valósítja 
meg. A program futását a DATA utasítások közvetlenül nem 
befolyásolják, használatuk igen egyszerű: 

DATA adat 1, adat2,... 

Az utasításban az adat helyén állhat szám vagy szöveg, de 
változó nem, csak konkrét érték. Ha speciális karaktert aka¬ 
runk használni (például ékezetes betűk, grafikus jelek), az 
adatokat egy soron belül a vesszőn kívül válasszuk el idézőjel¬ 
lel is! Pl.: 

10 DATA PETOn, RADNÓTI, ADY 
Ez így jó, de ékezetes betűkkel 
10 DATA “PETÖH”, “RADNÓTI”, ADY 
a helyes forma. Egy DATA utasításon belül is használha¬ 
tunk vegyesen karakteres és numerikus értéket, de ekkor a 
kiolvasásnál ezt figyelni kell! 

READ 

Az értékek kiolvasására szolgáló utasítás. Haszjiálatánál 
két dologra kell figyelni: 

Ne l^yen kevesebb adat, mint amennyit ki akarunk olvas¬ 
ni. (Ha mégis, akkor ?OUT OF DATA ERROR IN sorszám 
üzenetet kapunk, ahol a sorszám arra a sorra mutat, amelyik¬ 
ben a READ utasítás áll.) 

Ne akarjunk szöveges változóba numerikus adatot vagy 
numerikus változóba szöveget beolvasni! (Ha mégis, TYPE 
MISMATCH ERROR üzenet a „jutalmunk”.) 

Egy READ utasítással több (akár különböző típusú) ada¬ 
tot is beolvashatunk. Az utasítás pontos formája: 

READ változói, változó2,... 

Például egy éves naptárhoz a hónapok nevét és napjainak 
számát olvassuk be a HO$(I) és NAP(I) változóba magyar éke¬ 
zetes gépen: 

100 DIM HO$(12),NAP(12) 

110 DATA''január",31 ,"február",28,"március",31 ,"ápri- 
lis",30,'’május'',31 ,''június",30 

120 DATA'július”,31 ,augusztus,31 ,szeptember,30,'októ- 
ber',31 oiovember ,30,december,31 

130 FÓR I-l TO 12:READ HO$a)J^APa) 

140 NEXTI 

Ez csak egy példa, de itt is látható, hogy azoknál a hónap¬ 
neveknél, ahol nem yolt ékezetes karakter, az idézőjeleket 
nem kötelező kitenni. Végül egy megjegyzés: csakúgy, mint a 
szubrutinoknál, a DATA sorok bárhol állhatnak a READ uta¬ 


sításokhoz képest, sőt akár a programban elszórva is lehetnek. 
Nem akarunk itt abba a vitába belemenni, hogy hova célszerű 
a programon belül a DATA sorokat tenni, mert ennek a vitá¬ 
nak soha nem lenne vége, a BASIC programok végrehajtásá¬ 
nak i^bessége sem indokolja ezt a vitát. 

RESTORE 

Ezzel az utasítással van a legkevesebb gond. Használata is 
és hatása is igen egyszerű. Ha többször akarjuk u^anazt az 
adathalmazt beolvasni, vagy több különböző részét olvassuk 
be egy adathalmaznak, akkor használjuk. Pontos formája: 
RESTORE 
vagy 

RESTORE sorszám 

Az üres RESTORE utasítás a DATA mutatót a prepám 
elejére, a RESTORE sorszám pedig az adott sorra állítja. (A 
DATA mutatót a gép használja, innen olvassa ki, hogy a prog¬ 
ramban honnan kezdve keresse a következő adatot.) 

Példa: 

lOFORI-1 TO 10 
20 READ Aa) 

30 NEXT I 
40 RESTORE 110 
50FORJ-1 TO 10 
60 READ B(J) 

70 NEXT J 
100 DATA 1,2,3,4,5 
110 DATA 6,7,8,9,10 
120 DATA 11,12,13,14,15 

Ha ezt a programot futtatjuk, akkor az A tömbben rendre 

az 1,2,...,10 értekek, a B tömbben pedig az 5,6.15 értékek 

lesznek. A RESTORE utasítás alkalmazásával megkímélhet¬ 
jük magunkat az azonos adatrészek többszörös begépelésétől, 
és „mellesleg” még memóriát is takarítunk meg. Ugyanakkor 
a RESTORE alkalmazásánál is figyelnünk kell arra, hogy ne 
fogyjanak el az adatok! (Pl.: ha a fenti példánál a 40-es sorba 
RESTORE 115 kerülne...) 

Természetesen ennek fordítottja (ha az adat a több) nem 
hiba, hiszen mint említettük, a DATA utasítás a program fu¬ 
tását egyebekben nem érinti, csak a READ utasításnál, de 
meglehetősen botor cselekedet olyan adatokat beírni a prog¬ 
ramba, amit azután nem dolgozunk fel. Ezzel az erővel prog¬ 
ramunk nagyságát értelmetlen és felesleges RÉM sorokkal is 
növelhetjük... 

Végül álljon itt egy szubrutin, amellyel a gépi kódú része¬ 
ket tudjuk a memóriába tölteni BASIC programból, ha a gépi 
rész decimális formátumú. A rutin használata: 

5678 RESTORE XXX:GOSUB 9000 
Az XXX helyére kerül az első DATA sor sorszáma, amely 
tartalmazza a kezdőcímet és az adatok számát. 

9000 READ A,B 
9010 FÓR I-ATOA+B-1 
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9020 READ C 
9030 POKE I.C 
9040 NEXTI 
9050 RETURN 

A Commodore Újság 90/5-ös számában például a DATA- 
READ utasításpárral és hasonló FÓR cildussal tárol le a 
SPRITE KÉSZÜL című írásban e^ C64-es spríte-ot egy 
programrész. A sprite adatait decimálisán tárolja DATA uta¬ 
sításokban a 10-es sorszámú sortól kezdve, összesen 63 ada¬ 
tot. A mi rutinunkat használva saját programjaink tetszőleges 
helyeire elhelyezhetünk ilyen Uoldcokat, csupán ^y plusz sort 


kell a DATA listájához hozzátenni, pontosabban közvetlenül elé: 

5 DATA 704,63' 

és a beolvasórutint meghívni tetszőleges helyről: 

1234 FESTŐRE 5: GOSUB 9000 

Az első DATA sorban található két érték közli a rutinnal, 
hogy 63 adat van, és ezeket a 704-es decimális címtől kell 
elhelyezni. A rutin maga természetesen minden Commodore 
gépen működik, a sprite-os példa viszont csak a C64-es és 
C128-as gépre vonatkozik — mivel a C16 és a C+4-es nem 
ismeri a hardware sprite-ot! 

Lengyel István 


■ SZUBJEKTÍV TESZT 

■ A FINAL CARTRIDGE ill-RÓL 


A Cartridge bővítő portba helyezése és a gép bekapcsolá.sa 
után automatikusan a főmenü (DESKTOP) jelentkezik be kék 
alapon fehér betűszínnel, ^a a RUN/STOP billentyűt le¬ 
nyomva tartjuk a bekapcsoláskor, akkor a hagyományos beje¬ 
lentkező képet kapjuk — BASIC üzemmód —, erről azonl^n 
én szinte mindig megfeledkezem.) A főmenüből valamennyi 
lemezkezelési funkció — joystickkai vezérelve — működtet¬ 
hető (betöltés, formattálás, átnevezés stb.), azonban ezeket a 
funkciókat sokkal kényelmesebben lehet BASIC üzemmód¬ 
ban a kibővített DOS parancsok s^íts^ével használni. Na¬ 
gyon jól alkalmazható azonban a DESKTOP a lemezek tarta¬ 
lomjegyzékének módosításakor (programok sorrendjének 
cseréje, elválasztóvonal beírása). Lehetőség van a főmenüben 
a képernyő színeinek módosítására, ami nagyon kellemes, mi¬ 
vel véleményem szerint hosszabb ideig használva a gépet sok¬ 
kal előnyösebb fekete keretben zöld vagy világoskék háttere¬ 
ket nézjni. Kár, hogy a kedvünkre beállított színkombináció 
RÉSÉT hatására törlődik a memóriából helyt adva az erede¬ 
tinek. A főmenüből elérhető — egyszerű jegyzetek készítésére 
kiválóan alkalmas — szövegszerkesztő (NOT1E PAD) kezelése 
percek alatt elsajátítható, azonban sajnos nem rendelkezik 
ékezetes karakterekkel. 

A FREEZER funkció segítségével lehetőség nyílik néhány 
olyan program lemásolására is, amelyek az egyéb másolóprog¬ 
ramokat sikerrel megbolondítják, valamint játékprogramok 
használatakor a sprite ütközés figyelésének kiiktatására. Ez 
utóbbi funkció néhány játéknál megkönnyíti a célba érést, 
azonban olyannal is találkoztam, ahol kifejezetten megnehe¬ 
zítette a játékot, illetve semmit sem módosított rajta. 

A BASIC parancsok kibővítése (OLD, RENUM, AP- 
PEND, TRACE, DEL stb.), valamint a LIST parancs univer¬ 
zálissá tétele (kötetlen scrollozás mindkét irányban, vezérlő- 
karakterek kiírása a listában) feledteti a C64-es V2.0 verziójú 
BASIC-jének a hiányosságait. Tovább növeli a kényelmet, 
hogy a funkcióbillentyűk elő vannak programozva a nyolc 
leggyakrabban alkalmazott BASIC parancsra. 


A beépített gépi kódú monitor egyszerűen kezelhető, hasz¬ 
nos segítőtárs a programozáshoz (esetleg programfeltörés¬ 
hez). Kimondottan nagyszerű a karakter editor és a sprite 
editor funkció (ez utóbbi sajnos csak az egyszínű sprite-ok- 
hoz), a DISK-MONITOR funkció haszjiálata viszont meglehe¬ 
tősen körülményes. Előnyös viszont a tízes és tizenhatos 
számrendszerbeli számok egymásba való konvertálásának a 
lehetősége. 

A beépített nyomtató interface lehetőségeit — nyomtató 
hiányában — nem állt módomban kipróbálni, illetve 
ellenőrizni, ezért erről nem tudok véleményt mondani. 

Végül, de semmiképp sem utolsósorban, említem a cartrid¬ 
ge egy na^on szimpatikus tulajdonságát, azt, hogy feles¬ 
legessé teszi a turbóprogramokkal való bíbelődést. DATASET- 
TE használata esetén a LOAD’prg.név", 7 ül. SAVE'prg.név", 
7 parancs hatására a program turbózva kerül beolvasásra, ül. 
kimentésre. Ez a turbó az általam ismert összes turbóprog¬ 
rammal teljes kompatibilitást mutat. Programbetöltéskor a 
lustábbak (én is!) elég, ha a LOAD", 7 parancsot írják be, 
ekkor a szalagról a következő program töltődik turbóval. Le¬ 
mezegység használatakor a töltés, illetve kimentés esetén au¬ 
tomatikusan turbózva történUc kb. 10— 15-szörös sebességgel, 
valamint betöltés után kiíródik a program tárbeli elhelyezke¬ 
dése (kezdőcím, végcím) hexadecimálisán. 

A fentieken kívül a FINAL CARTRIDGE ül rendelkezik 
még néhány egyéb funkcióval is (CALCULATOR, ÓRA stb.), 
ezek használatára azonban nem nagyon volt szükség, ezért 
mellőztem a leírásukat. 

Véleményem szerint az ára (99.-DM) arányos az érte ka¬ 
pott szolgáltatásokkal, és úgy hallottam, hogy Magyarorszá¬ 
gon forintért is beszerezhető. (Hogy hol, arról nincs tudomá¬ 
som.) 

A kipróbáláshoz és használathoz sikert kíván 

Maurer Péter 
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Amiga Power 
PC-Board 

A Rossmöller cég, amely a C64-es 
tulajdonosok számára egyet jelent „a” 
hardverfejlesztő céggel, most az Amiga 
számára is kínál újdonságokat. Az Ami¬ 
ga 500-hoz készített Power PC-Board 
Phoenix BlOS-szal, a NEC V30 (8 MHz- 
es) 16 bites CPU-jával és a 4.01 -es Mic¬ 
rosoft MS-DOS-szal van fölszerelve. A 


kártyán ezenkívül 1 mbyte RAM-ot is 
találunk, amelyből jelenjeg 768 kbyte 
szabad a DOS számára. Ha a PC nem 
aktív, az Amiga 500 a teljes 1 mbyte tá¬ 
rolóra hivatkozhat, a panelba épített va¬ 
lós idejű órára úgyszintén. A Power Bo- 
ardot az Amigán a memóriabővítés he¬ 
lyére kell csatlakoztatni, az kívülről 
teljesen láthatatlan. A kiegészítő ára kb. 
798 márka. 

Információ: Rossmöller GmbH, 
Neuer Markt 21, D—5309 Meckenheim. 
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Ismerkedjünk meg a VIC—II. néhány olyan lehetőségével, 
amelyről eddig még nem /vagy csak említésszerűen/ szóltunk. 

KÉPERNYŐGÖRGETÉS /FINOM SCROLL/ 

Gyakran alkalmaznak karakteres grafikát — termé¬ 
szetesen módosított karakterekkel — háttérgrafikaként. 
Egyetlen bökkenője a dolognak, hogy nehéz a finomscroll-ha- 
tást megvalósítani a képernyőn. Ennek megkönnyítése végett 
beépítettek a VIC—II-be egy érdekes és nagyon hasznos lehe¬ 
tőséget. Az aktuális képernyőt ugyanis el lehet tolni 7 bittel 
lefelé és hét bittel jobbra bitenként. A fent említett hatást így 
már egyszerűbb megvalósítani: a képernyőt bitenként léptet¬ 
jük jobbra. Ha elérkeztünk a hetedig bitig, visszaállítjuk az 
eredeti /eltolás nélküli/ helyébe és a karakterhelyek tartalmát 
görgetjük eggyel jobbra, majd kezdődik az egész elölről. Ha 
elmozgatjuk a képernyőt, a mozgás irányával ellentétes szélen 
/fönt á/ vagy bal oldalon/ e^ üres, kihasználatlan háttér színű 
sáv keletkezik, melynek szelessége az eltolás mértékétől függ. 
A VIC—II. lehetőséget ad az így létrejött sávok „letakarásá¬ 
ra” is. A 17. regiszter/53265-MX) 11/ 3. bitjének segítségével 
megadhatjuk, hogy a képernyőn 24 vagy 25 sor legyen látható. 
Ez a függőleges gördítésnél hasznos. Ha horizontálisan görge¬ 
tünk, a 22. regiszterhez /53270-$D016/ kell fordulnunk, 
melynek 3. bitje határozza meg, hogy soronként 38 vagy 40 
db karakter legyen látható a képernyőn. Ha a fent amlített 
bitek közül valamelyik alacsony, a meghatározott részen 
„megnyúlik” a keret /24/38/, ha magas, visszaáll az eredeti 
helyzet. 

A finom scrollhoz a következő regiszterek szükségesek: 

53265 $D011 0—2. bitek — függőleges eltolás, 

53270 SDO16 0—2. bitek —vízszintes eltolás. 

A görgetés az alábbi sorral valósítható meg: 

POKE 53270,PEEK(53270) AND 248 OR X - vízszinte¬ 
sen: X:0-6 

POKE 53265,PEEK(53265) AND 248 OR Y - függőlege¬ 
sen: YK)-6 

Fölfelé görgetésnél hasznos lehet tudni, hogy a SYS 5%26 
/JSR $E8EA/ utasítás a karakteres képernyőt egy karakterrel 
följebb görgeti alul egy üres sort létrehozva ezzel. 

SZÍNEK 

A keret színét a 32. /53280-$D020/, a háttér színét a 33. 
/53281-$D021/ regiszterben kell megadnunk. Természetesen 
csak az alsó négy bit haszjiálatos. 

FÉNYCERUZA 

A fényceruza olyan — ceruzához alakjában hasonló — 
eszköz, melyet ha a képernyőre helyezünk, a VIC—H. képes 
megállapítani a koordinátáit /amely pontra mutat/. A CONT- 
ROLL PORT #1 csatlakozónál lehet a géphez kötni. Segítsé¬ 
gével vezérelhetünk mutatót a képernyőn, rajzolhatunk stb... 
TermészetOvSen ezekhez a megfelelő software-ekre is szükség 
van. A VIC-II. minden képfrissítésnél beírja a ceruza X;Y ko¬ 
ordinátáit a 19. és 20. regiszterébe. Az X koordináta kilenc 
bites adat, ezért a 19. regiszter nem lenne elég a tárolásához. 
Ezt a tervezők egy nem éppen elegáns módszerrel oldották 


meg: egyszerűen elhagyták az X legalsó bitjét. Ha jobban be¬ 
legondolunk, ez nem is olyan nagy baj, hiszen lehetetlenség 
Hl-RES képpont pontossággal pozícionálni a fényceruzával. 

KÉPERNYŐ LEKAPCSOLÁS 

Kazettás egység használatánál megfigyelhettük, hogy 
üzem közben a képernyő lekapcsolódik, kivétel az ACTION 
REPLAY CARTRIDGE tape turbo-ja. /Ezt a hatást is a 
VIC—Il.-nek /és a KERNAL ROM-program íróinak köszön¬ 
het jüky Ha a 17. regiszter /53265-$D011/ 4. bitje alacsony 
/-O/ kikapcsolódik a képernyő és keretszínűre vált. Bonyolult 
számítási műveletek idején szokták „gyorsító eljárásként” al¬ 
kalmazni. 

Kikapcsolás: POKE53265,PEEK(53265)AND239 

Bekapcsolás: POKE53265,PEEK(53265)OR16 


RASTER-POZICIÓ 

A VIC—Il.-ben a 18. regiszter /53266-$D012/ az un. rasz¬ 
ter-regiszter. Kiolvashatjuk belőle a képernyőn éppen felépü¬ 
lő rasztersor számát /vagyis az aktuális elektronsugár sorszá¬ 
mát/. Az adat kilencedik bitje a 17. regiszter 7. bitjében talál¬ 
ható. 


/VIC—II. általi/ MEGSZAKÍTÁSOK 

A mi kis VlC-II. nevű grafikus csoda chipünk még IRQ 
megszakítások kiváltására is képes a következő okok valame¬ 
lyikének beteljesülése hatására: 

a. , A raszter-regiszterbe írt érték megegyezik a raszter 
/elektronsugár/ aktuális sorával /RASTER megszakítás/. 

b. . Valamely spirte-nak és a háttér valamely karakterének 
látható része egymással fedébe került /kivéve a multicolor 
spriteOl bitkombinációja!/. 

c. . Valamely sprite-ok látható részei egymással fedésbe 
kerültek/kivéve a többszínű sprite 01 bitkombinációja!). 

d. , A kép felépítése éppen ott tart, ahová a fényceruza 
mutat. 

Az a. esetben a raszter-regiszterbe kell beírni annak a rasz- 
tersomak a számát, ahol megszakítást szeretnénk generálni. 
Ld.: az előző pontban. A VIC—II. 26. regisztere 
/53274-$D01A/ a megsz.akítást kérő regiszter. A 0-3. bitek¬ 
hez a fent felsorolt események tartoznak. Ha valamely bitet 
maga.sra állítjuk, a hozzátartozó esemény bekövetkezésekor 
IRQ megszakítás váltódik ki. 

Egy bit magasra áilítá.sa a 26. regiszterben: 

Ehhez a 7. bitet /128/ a magasra állítani szándékozott bit¬ 
tel együtt magasra állítva kell beírnunk a regiszterbe. 

Egy bit törlése a 26. regiszterben: 

Ehhez a 7. bitet alacsonyra és a kikapcsolni szándékozott 
bitet pedig magasra kell állítani, majd az így kapott értéket 
bePOKEolni a r^iszterbe. 

Ha tehát az 10000001 bineárís számot írjuk be, az 0. bit 
magasra állítódik. Ezt a 00000001 bineáris szám beírásával 
törölhetjük. 

A megszakítások beállításakor ne felejtsük el az /IRQ/ 
megszakítási vektort /$314/$315/ átírni. 

Tegyük fel, hogy kérelmeztünk egy megszakítást és az létre 
is jött. Honnan lehet megállapítani, hogy mi okozta azt? 

Erre szolgál a megszakítás állapotregiszter, a VIC—D. 25. 
regisztere: 53273-$D019. Ha a 7. bit /128/ magas, a megsza¬ 
kítást a VIC— n. generálta. Az alsó négy bit kiosztása meg¬ 
egyezik a 26. regiszterével, ha ^y megszakításra alkalmas ád- 
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lapot beköszönt, a 25. regiszter megfelelő bitje beállítódik a 7. 
bittel együtt. Ha a m^szakítást kérő regiszterben a ho7.zátar- 
tozó bit magas, létrejön a megszakítás is. Hogy ne jöjjön létre 
azonnal egy másik IRQ, az állapotregiszter megfelelő bitjét 
törölni kell. A VIC—II. által generált megszakításkor a 7. bit 
is magasra állítódik. Ha a kiolvasott értéket azonnal visszaír¬ 
juk, a megfelelő bit törlődni fog, ugyanis pontosan fordítva 
működik, mint a 26. regiszter bitjeinek beállítása/törlése. 


Ezzel a megszakítás! lehetőséggel pl; üzemmódokat kever¬ 
hetünk, a sprite-ok számát megsokszorozhatjuk, a szelleme¬ 
ket a keretre varázsolhatjuk, szmes sávokat hozhatunk létre a 
képernyőn. A lehetőségek száma itt végtelen. Gondoljunk 
csak a crackerek által készített tömérdek mennyiségű demo 
programra. 

Jackie 



írásvédelem 

lemezekhez 

A manapság alkalmazott írásvéde- 
Icm az 5 1/4 collos lemezeknél néha igen 
zavaró tud lenni, ugyanis az a leragasz- 
tás elvén „működik”. Egy ötletes felta¬ 
láló erre a problémára egészen új megol¬ 
dást kínál, méghozzá a felhelyeáiető vé¬ 
delmet. Ezt elegendő a lemezek írásvédő 
résébe tenni, amivel a véletlen törlés 
megakadályozható. Az írásvédő clip le¬ 
mezenként 20 pfennigbe kerül, egy zacs¬ 
kóban 10 db található. 

Információ: Norbert Kunze, Mo- 
zartstr. 7, D—6332 Ehringshausen. 

Wiesemann Toolart 

Az ismert Wiesemann cég ma már 
nemcsak interfészeket és Ideieket ér¬ 
tékesít. Toolart néven művészeti ter¬ 



mékcsoportot is kínálnak. Most három 
újabb alkotás kapható, amelyek nem¬ 


csak jól néznek ki, de használhatóak is. 
A Don’t Worry kép például nem más, 
mint az ismert „Ne nevess korán” játék 
művészi földolgozása. A képhez normál 
3D kövek és kockák is tartoznak. 

Információ: Wiesemann & Theiss 
GmbH, Winchenbachstrasse 3b, D— 
5600 Wuppertal, ár; 68 és 148 márka 
között. 

Kinek 

halálhírét költik... 

Egy IDC-tanulmány szerint a 9 tűs 
nyomtatók piaca továbbra is igen jól 
alakul. Európában több 2,5 millió prin¬ 
terrel 1757 milliárd dolláros forgalmat 
bonyolítottak le. A következő évekre 
azonban már nem ilyen rózsásak a kilá¬ 
tások. Lassú, de állandó csökkenéssel 
számolnak. 

A piac megoszlása is érdekes. A ve¬ 
zető cég továbbra is az Epson (20%). 
Közvetlenül ezután jön a Star (17%). 
Harmadik helyre jött föl az „újonc” Ci¬ 
tizen, amely 11 %-ot ért el. A maradé¬ 
kon a többi gyártó osztozik, 5% körüli 
arányokkal. 

Információ: Hcnschcl & Stinnes, Is- 
maninger Strasse 52, D—8000 Mün¬ 
chen 52. 

Környezetvédelem 
és könyvterjesztés 

A nyugatnémet Addison—Wesley 
kiadó, amely főleg számítógépes köny¬ 
veket forgalmaz, 1989. szeptember óta 
már nem hegeszt! le könyveit. Eleddig 
ugyanis azokat polietilén fóliába csoma¬ 
golták. Ha összeadjuk az NSZK-szerte 
forgalmazott több millió könyvre eső fó¬ 
liamennyiséget, 100 tonna fölötti, nem 
egészen veszélytelen műanyag jön össze, 
amely a környezetünket terheli. Éppen 
ezért az ötletei, amely a legutóbbi ten¬ 
denciák szerint a hulladék keletkezését 
akadályozza meg, nagyon jónak tartjuk. 

Játszva tanulni 

A legifjabb Commodore 64 számító- 
gépesek számára az Ariol cég „Spielend 
lemen” (Játszva tanulni) címmel két új 
programot mutatott be. Ezek összesen 
nyolc-nyolc kisebb programból állnak, 
amelyeket egy pedagóguscsapat fejlesz¬ 


tett ki. A számítógép felügyel a gyerekek 
előrehaladására. Az először a szülők ál¬ 
tal beállított nehézségi fok automatiku¬ 
san a gyerek képességeihez Ulesztődik. 
A csomagok ára egyenként 39,95 márka. 

Információ: Ariola, Hauptstrasse 70, 
D—4835 Riedberg 2. 

MS-DOS 

oktatóprogram 

Aki a közeli vagy a távoli jövőben 
MS—DOS számító^pre akar átszállni, 
máris gyakorolhat a Grebe Computer- 
tcchnik MS—DOS-Emulator program¬ 
jával. A C64-re készített oktatóprogram 
a PC-knél alkalmazott parancs¬ 
szintaktikát használja. Az emulátor 
összesen 19 utasítást ismer, köztük a 
FORMÁT parancsot is. Maximum négy 
lemezegység használata megengedett. 
Az MS—cfoS-Emulator alatt minden 
program (az utántöltősök is) futtatha¬ 
tók. 

Információ: Grebe Computertech- 
nik, Hintenstrasse 22, D—3590 Bad 
Wildungen, MS—DOS-Emulator Vl.O, 
ár: 35 márka. 

Amiga-sikerek 

Másodszor is az Amiga 500-ast vá¬ 
lasztották kompetens, független szak¬ 
írók az év (1989) házi számítógépének. 
A zsűri az indoklásában ezt írta: ,Á szá¬ 
mítógép belseje egyértelműen azt mu¬ 
tatja, hogy a házi számítógépes világban 
új korszak köszöntött be. A rendszer szí¬ 
ve — mint a nagytestvérnél, az Amiga 
2000-nél — a Motorola MC68000-rese, 
amelyet három nagy integráltságé pro¬ 
cesszor, az Agnus, a Denise és a Paula 
támogat. Ezek együtt attraktív, gyors és 
sokszínű képernyős grafikákról gondos¬ 
kodnak, s ők a „felelősek” a gép döbbe¬ 
netes hangképességeiért is. Ezek az 
Amiga 500 legizgalmasabb tulajdonsá¬ 
gai, amelyekkel ez a család mérföldkö¬ 
vet tett le a computerek fejlesztésének 
útjára.” 

Mint a C64-nél, itt is mutatkozik egy 
utánzási hatás, ami azt jelenti, hogy so¬ 
kan a barátnál vagy ismerősnél látják a 
gépet, s ennek okán veszik meg maguk. 
Szívből gratulálunk az Amigának! 

Információ: Commodore, Lyoner 
Str. 38, D—6000 Frankfurt 71. 
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TIPPEK - TRÜKKÖK 

Nyomtatás nagy alakú 
betűkkel a 64-es gépen 

Az alábbi program a leghatékonyabb rövid programok 
egyike. Megkönnyíti, hogy hirdetéseket, meghívókat nagy be¬ 
tűkkel, figyelemfelkeltő címekkel írjunk. 

A program működése egyszerű. Először ki kell választa¬ 
nunk a karakterek szélességét és magasságát, ezek 1 és 9 kö¬ 
zött választhatóak. Ha megnyomjuk a RETURN billentyűt 
anélkül, hogy bármit választottuidc volna, akkor három egy¬ 
ségnyi szélességű és nyolc egységnyi magasságú betűk jelen¬ 
nek meg. 

Ezután a hirdetés vagy meghívó szövegét kell begépelni. A 
szöveg bevitele nagybetü/grafika vagy nagybetű^isbetű 
üzemmódban történhet. Az üzemmódok közötti átváltáshoz, 
a megfelelő karakterkészlet kiválasztására nyomjuk meg egy¬ 
szerre a SHIFT és a COMMODORE billent^^t a szöveg begé¬ 
pelésekor. Ami ekkor a képernyőn megjelenik, az lesz a hirde¬ 
tésben vagy meghívóban is. 

Győződjön meg arról, hogy nyomtatóját bekapcsolta-e, 
mielótt a RETURN billentyűt lenyomja! 

A kívánt szöveg az utolsó karaktertől az elsőig megjelenik 
a képernyőn úgy, hogy az éppen nyomtatott karakter a képer¬ 
nyő jobb felső sarkában található. 
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R'.EH 

RÉM 

P.EM 

RÉM 

RÉM 


* C= Ü.JSRG SORSZBM- * 


■PRIHT 


C64 TRBHSZPFtREHS ^ 

* PROGRRM -KOVRCS MIHRLV ♦ 

100 PRINT":3ita TRRMS2PRREHS ~ 64 S" 

110 PR1RT")iWE:Z EGV rRRMSZPRREHS HVOMTRTO. " 

120 PRIMT" RTRV0M.J SR'.ETURllB-T, HR JO RZ RLRPBERLLITR>i 
130 PRIHT"RMI SZELESSEG=3/ MRGRSSRG=8"'PRIRT 
140 PRIHT"«Í1 GHIPT+COMMODORE GOMBOK KRPCSOLJRK R“•PRIHT 
150 PR.IRT"KISBETU-RROVBEfO R;RRRKTERK.ESZLETET. " ■ PRIRT 
160 PRIRT"RVTZ EPPER RVOMTRTOTl KRRRKTEP.T" 

165 PRIRT"RFt JOBB FELSŐ SRROKBRR LRTODW 
170 CLOSE1 : OF'ER 1,4- POF.'.E 53200.0 = P0K.E532e 1 / O 
180 W=3:H=8R><=552S«6 = BT=" " : " 

1S>0 ÍRPUT"SZÉLESSÉG l-9.> “ ; W • PR1RT“:T'VRB<:22> ; = IRPUT"MRGRSSRG 
200 PRIRT":i'.lRI=*T TRRRSZPRRERS SZÖVEGE. .. W" IRPUTM4- 
210 IFPEEK <; 53272 > =21 THERX=53248 = M=H.''2 

220 FORT=LER<Msr >TOlSTEP -1 = PR IRT" SJ" TRB<:38 ::«M10í CM^-, T, 1 ;■ ' C=PEEK<: 1062;' 

230 FORV=0TO7 FOR.R=0TO7 

240 P0KE56334,0 = POKEl ,51 i;!=PEEK<:X ^ <.C*8> ♦ R>RRÜ2 tV = POKEl , 55 • P0KE5G334, 1 
250 IFQ=2'tVTHERRí=R*+LEFTí<:PT,H> =0=1 ■ GOTO270 
260 RT=RT ♦■LEFTí-<Bí , H> 

270 REXT = CV=<'.80-LER<.R:T;< >.,'2 ■ FOP.Z=lTOW = IFDTHERPRIRTttl , SPC<;CV+M>Rí-; 

280 PRIRTttl , CHRÍ <:8> = PR.IRT#! , CHRí.< 15> ; = REXT = RT = " " ■ 0=0 REXT = REXT • PP.IRT#! • CLOSEl 

290 PRIRT"KWIWÍWIKJÍW»50^ TRRRSZPRRERS <. l.-'R>?" ’ WRÍT198, 1 

300 GETRÍ = TFRí = "I‘'THER RUR _ 


<1-9 >' 


;h 


o RERDV. 


Programozásunk közben gyakran van szükség a 8-as egy¬ 
ségszámú lemezmeghajtónk parancscsatomájának közvetlen 
elérésére. Ezt a 054-es V2.0-ás BASIC-ében mmdenféle 
OPEN és CLOSE utasításokkal tehetjük meg. Ez elég nehéz¬ 
kes és egy idő után bonyolulttá válik. A DISK COM’64 című 
próbám (1. lista) ezen kíván segíteni. A betöltő futtatása 
(RU^ után egyszerűen adhatunk parancsokat a lemezegysé¬ 
günknek: SYS828,'utasítás*. Pl.: SYS828,'VALIDATE' — 
validálja a lemezt. 

Bizonyos esetekben (pl. rutinkönyvtár alkalmazásakor) 
szülessünk lehet bizonyos programréswk összefűzésére. Erre 
szolgál a MERGE utasítás, mely a 64-es BASIC-ből kimaradt. 
A m^oldás: gépi kódú szubrutin. A MERGE’64 c. program 
(2. lista) a memóriabeli BASIC program végéhez fűzi a m^- 
adott (adathordozón lévő!) programot. Használata: 
SYS49152,'programnév', készűlékszám (kazetta: 1, lemez: 
8/9). 
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550 
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590 
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RÉM ♦*■*#**♦*♦*♦♦*■**#**»***!«(♦♦..**♦ 

RÉM # DISK C0M''64 C-64 ♦ O 

RÉM ♦ # 

RÉM ■* JflCKIE OF T.G.E. pí* O 

RÉM *♦**♦*♦♦*♦#♦♦#♦■♦***■♦'♦****■♦** 

FÓR 1= 828 TO 885 C) 

= RERD R:POKE I.. R ^ S=S-*»R 

REXT o 

IF SO 7434 THEN PRINT"HIBR" 

DRTR 32,253.. 174,. 32, 158 ..173, 32 
DRTR 163,182,141,117, 3,169, 1 ^ 

DRTR 162, 8,160, 15, 32,186,255 

DRTR 173,117, 3,166, 34,164, 35 O 

DRTR 32,189,255, 32,192,255,162 
DRTR 1, 32,198,255, 32,207,255 
DRTR 32,210,255, 36,144, 80,246 ^ 
DRTR 32,204,255,169, 1, 76,195 

DRTR 255, 7 _ 
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C> 300 RÉM *;+;*♦**♦****************♦**** 
510 RÉM * TGE MERGE-'64 G'-e4 ♦ 

O 520 RÉM * _* ^ 

530 RÉM ♦ JflCKIE OF T.G.E. |2* 

540 RÉM ♦****if+:^********if*********** O 
® 550 

560 FÓR 1= 49152 TŰ 49221 
O 570 : REFiD fl ■ POKE I.. fi • S=S+fl ^ 

5S0 HEXT 

590 IF S<> 3704 THEH PRIHT”HIBFt" O 
^ 600 DflTR 165,. 43.141,. 69,. 192. 165, 44 
601 DfiTFl 141. 70.192. 56.165. 45.233 „ 
O 002 DRTfi 2.141. 71.192.165. 46.233^ 

603 DRTR 0.141. 72.192. 32.253.174 

_ 61 Z 14 DRTR 32.212.225.169. 0.174. 71 O 

^ 605 DRTR 192.172. 72.192. 32.213.255 
606 DRTR 134. 45.132. 46. 32.183.255 q 
0 6.07 DFITFI 41.191.20S. 11,173. 69.192 

608 DRTR 133. 43.173. 70.192.133. 44 
^ 609 DRTR 96.169. 29. 76. 55.164.169 O 



A NYOMKÖVETŐ’^ c. program (3. lista) a BASIC prog¬ 
ramjaink tesztelésében és hibakeresésében segít. Indítás után 
(RUN, majd SYS49152) folyamatosan kijelzi az aktuális BA¬ 
SIC programsor számát. 
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500 

RÉM * 



o 


510 

RÉM * 

NVOMKOVETO'64 C-64 * 

0 

520 

RÉM + 


KIÉ OF T.G.E, 
^i^i***************** 



530 

RÉM * 

.IRC 

o 

0 

540 

550 

RÉM ♦ 

w-mm*** 



560 

FÜR I 

= 49152 

TG 49251 

o 

0 570 

= RERD R^POKE 

I.R ^ S=S+R 



580 

NEXT 



o 

0 

590 

IF S< 

> 11271 

THEN PRINT-HIBR" 


€00 

DRTR 

169. 11. 

141, 8. 3.169.192 

o 


601 

DRTR 

141. 9. 

3.' lií'S .• 56.' 32240 

0 602 

DRTR 

255.134. 

251.132.252. 32.102 



603 

DRTFl 

229.162. 

0.' 255 .• 233 165 

o 

0 

604 

DRTR 

58.201. 

255.208. 10.169. 83 


605 

DRTR 

Í60.192. 

32. 30.171. 76. 57 



606 

DRTR 

192.169. 

68.160.192. 32. 30 

L> 

0 

607 

DRTR 

171.165. 

58.166. 57. 32.205 



608 

DRTR 

189.•24. 

166.251.164.252. 32 

o 

0 

60S 

DFiTFl 

240.. 255,. 

76.. 228167.. 6575 



610 

DRTR 

84. 85. 

1 6 .• 1 3.1 oo.» 3ii. 

o 

0 

611 

DRTR 

83.. 73 f 

82. 58. 32. 0. 80 

612 

DRTR 

65. 82. 

65. 78. 67. 83. 32 



613 

DRTFl 

85. 90. 

63.' 77.* 77.* 73.' 68 

o 

0 

614 

DRTR 

El .• 255 




Tegyük fel, hogy személynyilvántartó programot írunk és 
szeretnénk takarékoskodni a memóriával. Ez esetben egydi¬ 
menziós tömböt alkalmazunk és egy elemben tároljuk eg^ás 
után (összefűzve) a nevet, címet, telefonszámot stb... föper- 
nyőre írás előtt az ily módon kreált elemeket bonyolult 
LEFTS, MID$, RIGHTS, LEN függvények segítségével fel kell 
bontanunk. Ezen segít a 4. listán látható rutin, a STRING 
USING’64. Segítségével egy füzérváltozó tartalmát formázot- 
tan írathatjuk ki. Megérteni egy kissé nehézkes, de használata 
egyszerű. Futtassuk a betöltőt RUN paranccsal. Ezután a ru¬ 
tin hívása a következő szintaxissal történhet: 

SYS49152, AS.'formátum', a, b. 
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A paraméterek a következők: 

A$ — A formázottan kiírandó füzér típusa(!) változó, 
formátum — A kiírás formáját m^atározó szöv^konstans. 

(Változó nem lehet!) Ahol ebben J^ukac) 
karakter áll, ott kerül kiírásra az A$ következő 
karaktere. 

a és b — Két — akár egymástól különböző — 

ASCII kód, mely minden egyes karakter 
kiírása után kiíródik. 

Pl.: a=0 és b-0-A$ a formátum szerint íródik ki. 
a-17 és b-157-A$ függőlegesen íródik ki. 
a-17 és b-0-A$ ferdái (jobbra-le) íródik ki. 
Pl: A$-'TGE':SYS49152A$.”*@ @ @*”, (RETURN) 
Hatása: "TGE* 

A$-'JACKIE':SYS49152A$,"@@@ @@@*",17,157 
Hatása: • 

J 

A 

C 

K 

I 

E 

* 


o 

500 

RÉM * 








0 


510 

RÉM + 


STR 

I MG 

USIH 

G''64 


* 


o 

520 

530 

RÉM if 
RÉM 


•TRC 

KIÉ 

OF T 

. G. E 



0 


540 

RÉM * 




***♦ 

*.**■* 

*** 



o 

550 









0 


560 

FÜR I 

“ 4!F 

152 

TG 

4926 

2 




o 

578 

^ RERD Rj 

POKE 

I.R 

: S = S 

+ R 



0 


580 

MEXT 









590 

IF S< 

> lí 

062 

THEN PF 

INT" 

HIB 

R" 


o 

600 

DRTR 

'32 .* 

25'.n' .• 

174. 

•ZxsL f 

158. 

173 

f 352 

0 


601 

DRTR 

163 .• 

182. 

:L 31:3 .• 

248. 

165. 

34 

. 133 


o 

602 

DRTR 

249. 

165. 

"'5 

133. 

250. 

32 



603 

DRT R 

174. 

32 

158. 

173. 

32 • 

163 

. 182 



604 

DRTR 

133. 

251. 

165 . 

34. 

1 3131 ^ 

252 

. 165 


o 

605 

DFlTR 

. 

133 . 

253. 

3i2 .• 

253.. 

174 


0 


606 

DRTR 

158 . 

183. 

134 . 

254. 


253 

. 174 


o 

607 

DRTR 

32 .• 

158 . 

13i3 .i 

134. 

255. 

160 

0 


608 

DRTR 

132. 

2.* 

1 7 1' ' 

252 

201. 

64 

. 2018 


o 

6€13 

DRTR 

24. 

140. 

60 .■ 

""i • 

164. 

2 

. 177 


610 

DRTR 

249. 


210. 

^iisrc^ ^ 

230. 


. 165 

0 


611 

DRTR 

2 

197. 

248 

240. 

27 

172 

. 60 


o 

612 

DRTR 

Fi. 

76 

91. 

192. 

3í2 z 

210 

. 255 

0 

613 

DRTR 

200.- 

196. 

251. 

240. 

13. 

165 

. 254 

o 

614 

DRTR 


210. 

255.. 

165. 

255. 


.210 


615 

DRTR 


76 

58. 

192. 

96 .• 

255 


0 

Az 5. listán egy 
CTRL’64. Segítséggel 

érdekes program található, a POLl 
a CTRL (kontroll) és a “betűs” billen- 


tyűk egyidejű lenyomásához rendelhetünk max.: 10 karak¬ 
teres füzért, mely a billentyűk leütésekor kiíródik a képer¬ 
nyőre. A hozzárendeléseket a HJNKCIÓ BEÍRÓ programmal 
(6. lista) végezhetjük. 

Ha egy file-t a megadott címtől kezdve szeretnénk betöl¬ 
teni a C64-es memóriába, alkalmazzuk a 7. listán található 
SPEC LOAD’64 c. programot. Indítása: RUN, majd 
SYS49152,'file-név', készülékszám, kezdőcím. 

Készülékszám: kazetta: 1 
lemez: 8/9 

Az előző bekezdésben említett funkció ellenkezőjére is 
adok egy rutint, amely a „kis kedvencünk” (a C64-es) meg¬ 
adott memóriadarabját menti ki a megadott háttértárolóra. 
Használata egyszerű: SYS49211,"programnév", készűlék- 
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szám, memória kezdőcím, memóriadarab végcíme. Mentésnél 
a SAVÉ utasításnál megszokott üzeneteket lapjuk. Ez a rutin 
a SPEC SAVE’64 és a 8. listán található. 


O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


500 

510 

520 

530 

540 

550 

560 

570 

5S0 

590 

600 

601 

602 

603 

604 

605 

606 
607 
603 

609 

610 
611 
612 

613 

614 

615 

616 

617 

618 

619 

620 
621 
622 

623 

624 

625 

626 
627 
623 
629 


REN ******ití#**#****#*it(itf*##)4íHí**** 
RÉM ♦ POLI <CTRL>''64 0-64 ♦ q 

RÉM * _* 

RÉM * JflCKIE OF T.G.E. |5 * 
RÉM *♦*».*♦*****♦:*#♦*♦♦♦*#♦*.♦♦**♦ O 


FÜR 1= 49152 TO 49355 q 

: RERD ALPOKÉ I.. fl : S=S+Fl 

NEXT 

IF S<> 23693 THEN PRIHT"HIER’' O 
DRTR 120,. 169, 17,141.. 20, 3,169 

DRTFl 192,141, 21, 3,169, 0, 133 q 

DRTR ^, 33, 96,230, 2,165, 2 

DRTR 201, 10,203, 45,169, 0,133 

DRTR 2,173,141, 2,201, 4,203 © 

DRTR 34,165,203,163,135, 73,192 
DRTR 133,251,185,138,192,133,252 Q 
DRTR 162, 0,160, 0,177,251,157 

DRTR 119, 2,201, 0,240, 6,232 

DRTR 200, 192, 1Ü, 203,241,134,198 

DRTR 76, 49,234, 91, 91, 91, 81 
DRTR 51, 61, 71, 91,233, 11, 47 Q 

DRTR 243, 41,227, 87, 91,253,217 


DRTR 

DRTR 

DRTR 

DRTR 

DRTR 

DRTR 

DRTR 

DRTR 

DRTR 

DRTR 

DRTR 

DRTR 

DRTR 

DRTR 

DRTR 

DRTR 

DRTR 


T^T* • 

7 ' 

67, 

. 97, 

2.37, 

. 21, 

17 


31, 

107, 

27, 

57, 

117, 

247, 

1 

O 

37, 

127, 

137, 

. 203, 

167, 

. 147, 

187 


177, 

91, 

197, 

157, 

91, 

91, 

91 

O 

91, 

. 91, 

91 , 

. 91, 

91, 

. 91, 

91 

91, 

91, 

91, 

213, 

91-, 

91 , 

223 

o 

91, 

91, 

207, 

■ 91, 

91, 

. 194, 

194 

194, 

194, 

194, 

194, 

194, 

194, 

192 


194, 

193, 

192, 

. 194, 

193, 

. 193, 

194 

o 

192, 

193, 

193, 

193, 

193, 

193, 

193 

194, 

193, 

194, 

193, 

193, 

193, 

193 

o 

193, 

194, 

193, 

193, 

193, 

192, 

193 

193, 

. 193, 

193, 

194, 

193, 

193, 

194 


194, 

194, 

194, 

194, 

194, 

194, 

194 

o 

194, 

194, 

194, 

194, 

194, 

192, 

194 


194, 

192, 

194, 

194, 

193, 

194, 

194 



100 RÉM 


Oll0 
120 
130 
C> 140 
150 
0160 
170 
180 
Ol90 
200 
0210 
220 
230 
^240 
250 
0260 
270 
280 
® 290 
300 
0310 


♦ 

■* 


RÉM 
RÉM 
RÉM ■* 
RÉM * 
RÉM ♦ 


FUNKCIÓ beíró 
R FOLI <CTRL>'64-HEZ 


* 

♦ 

* 

..TRCKIE OF TGE _# 

ÍTGE-THE GRERT ENEMV>f6* 

RÉM 

PR INT C:HRí:<:147>; 

PRINT-MIHEZ RKRRSZ UTRSITRST RENDELNI" 
INPUT"0-9, R-Z ";Rt 

B»="0123456789RBCDEFGHI .JKLMNOPQRSTUVWX 
FÓR 1 = 1 TO LENÍBí:',- 

' IF MIDí <Bí-, 1, 1 > =R$THENSZ= I = I = 1E+38 
NEXT 

IFSZ=0THENRUN 

INPUT"ZtlIT RENDELSZ HOZZR";RÍ 
IFLEN < Rí > >10THEN250 
IFLEN < Rí ><10THENRÍ=Rí+CHRÍ < 0 > 

FÓR 1=1 TO LEN<RÍ> 

P0KE49344+10*SZ+1,RSC < MIDí < Rí,1,1> > 
NEXT 
END 


O 

O 

O 

O 

VZ" 

o 

o 

o 

o 


500 RÉM ■♦**♦*.♦:*♦♦*♦*********■:♦!♦»*♦♦*♦ 

O 510 RÉM * SPEC LORD'■64 C-64 ♦ O 

520 RÉM * _* 

O 530 RÉM * JRCKIE OF T.G.E. P?* o 

540 RÉM í+íití************************** 
550 ■ 

O 560 FÜR 1= 49152 TO 49210 O 

570 ■■ RERD R'POK'E I, R = S=S+R 
O 5S0 NEXT Q 

590 IF S<;.> 7814 THEN PRINT"HIBR" 

600 DRTR 32,253,174, 32,158,173, 32 
0 601 DRTR 163,182,166, 34.,164, 35, 32 O 
602 DRTR 189,255, 32,253,174, 32,158 
Q 603 DRTR 183,160, 0, 32,186,255, 32 o 

604 DRTR 253,174, 32,138,173, 32,247 

605 DRTR 183,133,196,132,195,169, 0 

0606 DRTR 32,162,244, 32,183,255, 41 O 

607 DRTR 191,208, 1, 96,162, 29, 76 

O 608 DRTR 55,164,255 o 


o 


o 


500 
510 
520 
530 
540 
550 
O 560 
57*0 

o 

590 
600 
O 601 
602 

603 

604 

605 
O 606 

o 


o 


RÉM 

RÉM 

RÉM 

RÉM 

RÉM 


O 


SPEC SfiVE''64 C-64 * 

■* _ * 

* ..TRCKIE OF T.G.E. [ö* 0) 

**!t-:*í+iif;***.^i4f*##***********i*i4e* 


FÓR 1= 49211 TO 49268 
: RERD R:POKE I,R=S=S+R 
NEXT 

IF S<> 8195 THEN PRINT"HIBR' 


O 


00 DRTR 


32,253,174, 32,158,173, 32 o 
DRTR 163,182,166, 34,16.4, 35, 32 
DRTR 189,255, 32,253,174, 32,158 
DRTR 183,160, 0, 32,186,255, 320 

DRTR 253,174, 32,138,173, 32,247 
DRTR 183,133,194,132,193, 32,2530 
DRTR 174, 32,138,173, 32,247,183 
DRTR 133,175,132,174, 32,234,245 
DRTR 96,255 O 


És íme, a harmadik SPEC (speciális) rutin, a SPEC IN¬ 
PUT# (9. lista). Ezen csodálatos rutinnal egy megadott 


O 


O 500 
510 
520 
530 
540 
O 550 
560 

ű 

580 

590 

O 600 
601 

O 

603 

604 
O 605 

606 
O 607 
fc>08‘ 
609 

o 


RÉM ♦♦♦.♦■♦**»***ít<********»******* O 
RÉM * SPEC INPUT#'64 C-64 * 

RÉM * _* O 

RÉM * ..TRCKIE OF T.G.E. [9» 

RÉM ♦##********i********»*i4!*#*i#ííí*' _ 


FÓR 1= 49270 TO 49337 

= RERD R^POKE I,R:S=S+fi Q 

NEXT 

IF S<> 8532 THEN PRINT"HIBR" 

DRTR 32,253,174, 32,158,183,134^ 
DRTR 19, 32,253,174, 32,158,183 
DRTR 134, 97, 32,253,174, 32,1.39 0 
DRTR 176,165, 97,208, 3, 76,186 

DRTR 171, 32,163,182,165, 97, -32 ^ 
DRTR 117,180,160.. 2,185, 97, 0 

DRTR 145, 71,136, 16,248,166, 19 
DRTR 32, 30,225,160, 0, 32,2070 

DRTR 255,145, 98,200,196, 97,208 
DRTR 246, 76,181,171, 0 
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hosszúságú részt (max.: 254 karakter) olvashatunk be füzér¬ 
változóba egy fUe-ból. Az adott file-t használat előtt meg kell 
nyitnunk egy OPEN utasítással. Indítása: SYS49270, logikai 
fUe-szám, beolvasás hossza, füzérváltozó. Pl.: A$-"': 
OPEN8,8."ADATOK,SEQ,READ":SYS49270.8.10A$: 
CLOSE8 

Az ADATOK nevű file-ból 10 karaktert beolvas az A$-be. 

Ha BASIC programunkban 108-as kódú karaktert 
(SHIFT+'L') helyezünk el, a LIST-rutin kénytelen lesz hibával 
megszakítani a listázást. Ez egy védelmi lehetőség a listázás 
ellen. A kedves „hivatásos programlistázó” barátaimnak ké¬ 
szítettem egy kis rutint (10. lista: LIST TRÜKK’64), mely 
lehetővé teszi az ily módon védett programok listázását is. A 
108-as karaktert “*”-gal helyettesíti a listázás során. Indítása: 
RUN, majd SYS828. 


O 


o 5: 


o 


500 
510 
520 
50 
540 
550 
560 
570 
O 580 
5801 
600 
^ 601 
602 
O 6013 
604 


RÉM *mmm****mm*i¥mmmm*** 

RÉM .♦ LIST TRÜKK"64 C.-64 ♦ ^ 

RÉM * « 

RÉM * JfiCKIE OF T.G.E. fiÖ"* O 

RÉM ****#■***♦**♦***♦****♦**♦♦.♦** 


FÜR 1= 828 TQ 85£ 
' REFID fi = POKE I.. 8^ 
NE XT 

IF 80 3068 THEH 


D8TFI 

DflTfi 

DRT8 

DRTR 

DRTR 


169.. 71 

141.. 7 

240.. 8 
76.. 26 

243.166 


141.. 
3. 

201 .. 
167. 

0 


PRI 
6 .. 
96.. 

2014.. 

169.. 


S+R 

'rr"HiBR" 
3. 169.. 
8.. 201 .. 
240.. 4.. 

42.. 40.. 


O 


108 

40 


O 


A RÉM RÖV’64 c. program (11. lista) lehetővé teszi a 
V2.0-ás BASIC-ben a RÉM utasítással “!”-íel (felkiáltójellel) 
való rövidítését. Indítása: RUN, majd SYS828. 


„ 500 RÉM ♦*♦***#*##♦♦♦*♦*♦***♦#■**♦*♦* 
^510 RÉM * RÉM R0V-'64 C-64 # 

520 RÉM * * 

0 530 RÉM * .JRCKIE OF T.G.E. pÜ"* 

540 RÉM m*m*mmíinm^*^W:m*****i¥*m 
^ 550 = 

560 FÓR 1= 828 TG 863 

5701 RlEFiD R ■ F'CiKE! I.. R - S^S+Fl 
O 580 NEXT 

590 IF 80- 3259 THEN PRINT'‘HIBR'' 

Q 600I CiRTR 169. 71.141. '4. 3. 16i9. 3i 

601 DRTR 141. 5. 3. 96.166.122.160 

602 DRTR 4.132. 15.189. 0. 2. 8 

0603 DRTR 201. 33.208. 6.169.143. 40 

6 : 01.4 DRTFl 76.2011.165. 40. '76. 130i. lí>5 



O 

o 

o 

o 

o 

o 


J 


Ha 80 karakternél hosszabb sorokkal dolgozunk, jól jöhet, 
ha a PRINT helyett egy “?” jelenik meg listázáskor. Ezt a célt 
szolgálja a 12. lista: MÓDOSÍTOTT LIST’64. (A RÉM helyett 
pedig “!”-et listáz.). Aktivizálása: RUN, majd SYS864. A 
RÉM RÖV rutinnal együtt is futhat, egymást nem zavarják! 

Megj.: A három SPEC-rutin (LOAD, SAVÉ, INPUT#) 
egyszerre is a memóriában lehet, egymást nem zavarják. 

A VERTIKÍRÓ’64 (13. lista) segítségével egy füzérváltozó 
(itt: A$) tartalmát függőlegesen írhatjuk ki. Használata: RUN, 
majd SYS828A$. 


O 


o 


RÉM ♦•4!í4!4‘.***#*************#*#**** 
RÉM * módosított LIST C-64 * 

RÉM * _SK 

RÉM ♦ .JRCKIE OF T.G.E. 


O 


0 

550 




0 


560 

h UK 1— W6 

4 TO 900 




570 

• RERD R = 

POKE I.R = S=S 

+R 

0 

0 

580 

NEXT 




590 

IF S<> 37 

72 THEN PRINT"HlBR" 


0 

600 

DRTR 169. 

107.141. 6. 

3 ;169. 3 

0 

601 

DRTR 141. 

7 j 396.. 

8.201.143 


602 

DRTR 208. 

6 j* 169 .• 33 .• 

40. 76.243 

0 

0 

603 

DRTR 166.* 

201 .153.208. 

6.169. 63 


60*4 

DRTR 40. 

TS? 243 .► 166 

40. 76. 26 


0 


DRTR 167. 

0 


0 


O 


500 
510 
520 
O 530 
■540 
... 550 
^ 560 
570 
O 580 
590 
600 
601 
602 
O 603 
6014 

o 


o 


RÉM O 

RÉM * VERTIKIR0"64 C-64 * 

RÉM 41 * 

RÉM * JRCKIE OF T.G.E. 13* 
RÉM **************************** 

o 

FÓR 1= 828 TO 862 

• RERD R ' POKE I. R • S;=S+R q 

NEXT 

IF S<> 4646 THEN PRINT"HIBR" 

DRTR 32.253.174. 32.158.173. 32 O 
DRTR 163.182.133. 2.160. 0.177 

DRTR 34. 32.210.255.169. 17. 32 q 

DRTR 210.255. 169. 157. 32. 210i. 255 
DRTR 200.196. 2.208.236. 96. 0 

O 



^ 500 RED *+:************************** O 
510 RÉM * LRSSUIRÜ"64 C-64 * 

O 520 RÉM * * _* 

530 RÉM * JRCKIE OF T.G.E. 14-*'^ 

540 RÉM **************************** 

^ 550 : O 

560 FÓR 1= 828 TO 876 
O 5701 : RERD R ' PCiKE I. R • S=Si+Fl ^ 

580 NEXT ^ 

^ 590 IF 80 7445 THEN PRINT'‘HIBR" 

^ 600 DRTR 32.253.174. 32.158.173. 320 
601 DRTR 163. 182. 133. 2.160. 01.177 

O 602 DRTR 34. 32.210.255.132.252.160 „ 
603 DRTR 0.162. 0.234.234.234.232 ^ 


604 DRTR 224. 0.208.248. 234.234.234 

^ 605 DRTR 200.192. 43.208.238.164.2520 
606 DRTR 200.196. 2.208.222. 96. 0 



^ 500 RÉM ************4!##*********ití*itf*® 
510 RÉM * ERRSE"64 C-64 * 

O 520 RÉM * ^_|4fO 

530 RÉM * JRCKIE OF T.G.E. [l5'* 

540 RÉM ♦♦*#******♦**♦*##■*■**.♦!((#**.♦♦* 

® 550 = ^ 

560 FÓR 1= 828 TO 891 
O 570 = RERD R’POKE I.R■S=S+R O 
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O 500 
SS*© 

o ®®® 
601 

602 

O 603 

604 

O 

606 
607 
O 608 
600 


HEXT 

IF SO 7335 
OnTfi 32.115/ 
DRTfl 2.. 177. 
DfiTfl 200.177. 
DRTR 160. 0. 

DRTR 6.165. 
DRTR 177. 71. 
DRTfl 2.230. 
DRTR 230. 96. 
DRTR 133. 49. 
DRTR 0 


O 


THEN PRIHT"HIBR'.' 

0. 32.139.176.160 O 
95.101. 95.133. 71 
95.101. 96.133. 72 
165. 71.197. 49.208 
72.197. 50.240. 19 

145. 95.230. 71.208 O 
72.230, 95.208.230 
76. 83. 3.165. 95 


165. 96.i: 


50. 96 


O 


A következő nitínocska (14. lista; LASSÚÍRÓ’64) a meg¬ 
adott füzérváltozó (itt: A$) tartalmát lassítva — a begépelés 
látszatát keltő módon — írja a képernyőre. Aktivizálása; 
RUN, majd SYS828A$- A lassítás sebességét A 605-ös sor 
“43" konstansának átírásával módosíthatjuk. 



100 


1 10 

o 

120 


130 

o 

140 


150 


160 

o 

170 


180 

o 

190 


200 


210 

o 

220 


230 

o 

240 


250 

0 

260 

270 


280 

o 

290 


300 

o 

310 

320 


330 

o 

340 


350 

o 

360 

370 


380 

o 

390 


4010 

o 

410 

420 


430 


O 


RÉM ##***##**#*#i4í##*#*#***itf»*****i4f 
RÉM * T.G.E - DRTR CENERRTOR * 

RÉM ♦ _* 

RÉM *■ JRCKIE OF TGE 

RÉM 


POKE532S0. , ■•P0KE532S1. . =P0KE646.5 
IHPUT" niEMORIRTERULET KEZDETE";K 
IF K<0 OR K>65535 THEH 170 
INPUT" MIEMORIRTERULET VEGE ";V 
IF V<0 OR V>65535 OR K>=V THEN 190 
PRINT"ri«Mi!J500 RÉM ♦♦♦*♦♦*♦****♦*#♦*#♦*#♦♦♦*♦#♦ 
PRINT"510- RÉM * ERSIC-BETOLTO C-64 ♦" 

PRINT"520 RÉM * #" 

PRINT"530 RÉM * JRCKIE OF T.G.E. ♦" 

PR INT "540 RÉM *.♦♦♦;***♦#♦♦*#*♦*♦*****#♦*#**" 


PRINT"550 =" 


PRINT"560 FÓR I="K" TO"V 
PRINT"570 ■ RERD R=POKE I.R=S=S+R" 
PRINT"K="K" :V="V" ••GOTO320M" 
PRINT"4a” 


FÓRI=0TO3 = P0KE631 + 1.13;NEXT:POKE198.9 = END 
PRINT":^(®(W1580 NEXT" 

PR INT "590 IF SO_ THEN ?"CHR:Í <34> "HIBfl"CHRí=<:34> 

PRI-NT"K="K." : V="V" = SS=600 = GOTO360a" 

P0KE631.13 = P0KE632.13 = P0KE633.13 = POKE 198.3 = SS==600 = END 

PRiNT"rn!W!is"ss"DRTR "=fori=ito7 = sí=" "+str*(:peek<:k>> = sm=sm+peek 

PR INTRI GHTí: < Sí. 3 > " . " ; = K=K+1 = I FK>VTHEN I =255 

NEXT = PRINTCHRí<20> =PRINT"K="K"=V="V"=SS="SS"=SM="SM"=GOTO400a" 
P0KE631.13=P0KE632.13=P0KE633.13=PÖKE198.3=END 


IFKC=VTHENSS=SS+1= GOTO360 

PRINT"2I«iSl«590 IF SO"SM" THEN ?"CHRÍ <34> "HIBR"CHRÍ<34> 


PR I NT " 43" = P0KE631.13 = POKE 198.1= END 

RÉM ###*♦***♦•♦♦*#**♦♦**♦*♦♦**♦***♦ 



K> 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


A tömböket használóknak gondot okoz, hogy a tömböket 
nem lehet törölni. Eme cél elérése érdekében készült az ERA- 
SE’64 rutin (15. lista). Használata; RUN, majd SYS828AS(0). 
Hatására törlődik az A$(x) tömb. 


O 

500 

RÉM 


o 

510 

RÉM 


GVORS 

RENDEZŐ'64 C-64 * 



520 

RÉM 


FÜZÉR 

TIPUSLI TÖMBRE. ,_# 

o 

O 

530 

RÉM 

* 

JRCKIE OF T.G.E. 16* 


540 

RÉM 



O 

550 





o 



FÓR 

1 = 

49152 

TO 49411 



570 

= RERD 

fl = POKE 

I.R = S=S+R 


O 

580 

NEXT 



o 


590 

IF 

SO 

33545 

THEN PRINT"HIBfl" 



o 

600 

DRTfl 

601 

DRTR 


602 

DRTfl 

o 

603 

DRTR 


604 

DRTR 

o 

605 

DRTR 

606 

DRTR 


607 

DRTR 

o 

608 

DRTR 


609 

DRTR 

o 

610 

DRTR 

611 

DRTfl 


612 

DRTR 

o 

613 

DRTR 


614 

DRTR 


Q 615 DFiTfi 


32M15.. 0z 32. 139.. 176. 165 
71.141. 1.193.165. 72.141 C) 

2.193. 32.115. 0. 32.158 

173. 32.247.183.165. 20.133 q 
251.165. 21.133,252.169. 1 

133. 79,169. 0.133. 78.133 

80.230. 78. 6. 79. 38. 80 ^ 

56.165. 79.229.251.165. 80 
229.252.144.239. 70. 80.1020 

79. 56.165.251.229. 79.133 
253.165.252.229. 80.133.254 
169. 0.133,255.133. 81.133° 

82.173. 1.193.133. 87.173 

2,193.133. 88.165. 80.1330 

38.165. 79. 10. 38. 38. 24 
101. 79.101. 87.133. 89.165^ 


OKTÓBER -J[2 





























' TIPPEK- TRÜKKÖK 


616 

617 

618 

619 

620 
621 
62 

623 

624 
O 625 

626 

627 

628 

629 

630 

631 

632 

633 

634 
O 635 

636 

o 


o 


o 


o 


DflTfi 38.101. 80.101. 88.133. 90 
DRTfi 160. 0.177. 87.133. 95.177 
DflTR 89.133. 96.200.177. 87.133 
DRTR 91.177. 89.133. 93.200.177 
DRTR 87.133. 92.177. 89.133. 94 
DRTR 160. 0.177. 93.209. 91.144 
DRTR 17.208. 32.200.196. 95.240 
DRTR 27.196.' 96.240. 6.208.237 
DRTR 208.163.208.144.160. 2.132 
DRTR 255.177. 87.170.177. 89.145 
DRTR 87.138.145. 89.136. 16.243 
DRTR 230. 81.208. 2.230. 82.165 
DRTR 87. 24.105. 3.133. 87.144 
DRTR 2.230. 88.165. 89. 24.105 
DRTR 3.133. 89.144. 2.230. 90 
DRTR 165.253.197. 81.208.152.165 
DRTR 254.197. 82.208.146.165.255 
DRTR 240. 19. 56.165.253.233. 1 
DRTR 133.253.176. 4.198.254.165 
DRTR 253.208.176.165.254.208.172 
DRTR 198. 78.208.170. 96. 38. 8 
DRTR 255 _ 


O 

o 

o 

o 

o 

o 

o 

o 

o 


Sokszor van szüks^ e^fűzértömb ABC-sorba rendezésé¬ 
re. Ez a GYORSRENDEZŐ’64 c. rutinnal (16. lista) villám¬ 
gyorsan elvégezJiető. Indítása: RUN, majd SYS49152A${k)m. 
Hatására az A$(x) tömb k-adik elemétől kezdve n darab eleme 
kerül ABC-sorrendbe. 


Q 500 RÉM **ite*#******#s4f*#**»**s((i*f****** O 
510 RÉM * RKTIV-E fl 8 -flS DRIVE’? * 

520 RÉM * * Q 

0 530 RÉM * JRCKIE OF T.G.E. 

540 RÉM 

q550 = C 

560 FÓR 1= 828 TO 890 

570 : RERD fl>POKE I. R = S=S+fi Q 

O 580 NEXT 

590 IF 80 6601 THEN PRINT"HIBR" 

0 600 DRTR 169. 1.162,208.160.255. 32 ^ 

601 DRTR 189.255.169. 1.162. 8.160 

602 DRTR 0. 32,186,255. 32.192.255 Q 

<^603 DRTR 176. 20.104,104.169. 97.160 

604 DRTfi 3, 32.135.180.169, 1, 76 

0 605 DRTR 195.255. 65. 75. 84. 73. 86 ^ 

606 DRTR 0.104.104,169.112.160, 3 

607 DRTR 76. 89. 3. 78. 69. 77. 32 O 

*^608 DRTR 65. 75. 84. 73. 86 . 0. 0 

610 P0KE785.60 = P0KE786,3 
£í-- 


100 RÉM -ti*##*##*##**#**#*#*********#*** 
O110 PEM * DRIVE EGVSEGS2RM RTRLLITRSR ♦ 

120 RÉM * _ 

130 RÉM # JRCKIE OF T.G.E. [l9* 

'^140 RÉM ♦ite*********!*!****.^***#*****#**** 
150 INPUT "REGI EGVSEGSZRM";R 
O 160 PRINT ' O 

170 INPUT "UJ EGVSEGSZRM ";U 
,180 OPEN 15.R.15 Q 

^ 190 PRINT#15. "M-W'CHRÍc: 119>CHRt<0>CHR4: 

<; 2 > CHRít ( 32+U > CHRí: < 64+U > 

0200 CLOSE 15 O 

210 END 
q220 rém 


Gyakran okoz nehézséget a gépi kódú programokból BA¬ 
SIC betöltő készítése. A BETÖLTŐ GENERÁTOR c. prog¬ 
ram (17. lista) megoldja gondjainkat, sőt még ellenőrző ösz- 
szeget és megjegyzés sorokat is generál. Indítása: RUN. Hasz¬ 
nálat után a rutint (100—430) töröljük. 

Az AKTÍV DRIVE (18. lista) futtatása után (RUN) az 
USR(x) függvénnyel megtudhatjuk a 8-as számú lemezegysé- 


o 500 rém ♦♦!»í*itf*#i4í:+:i4f*#***#*****»****** O 
510 RÉM ♦ HRNVRS R DRIVE? C-64 * 

Q 520 RÉM # -.* o 

530 RÉM * JRCKIE OF T.G.E. |Z0* 

540 RÉM *♦*♦#■♦♦♦♦♦♦*#♦*#♦♦■***♦****** 

O 550 : O 

560 FÓR 1= 828 TO 878 
O 570 : RERD R-POKE I.R=S=S+fi q 

580 NEXT 

590 IF 80 6206 THEN PRINT“HIBR" 

Q 600 DRTR 169. 8.133. 2.169. 1. 320 

601 DRTfi 195.255.169. 1.162.208.160 

O 602 DRTR 255. 32.189.255.169. I.I 660 

603 DRTR 2.160. 0 . 32.186,255. 32 

604 DRTR 192,255.144. 13.230. 2.165 

O 605 DRTfi 2.201. 16.208.220.160. ©O 

606 DRTR 76.162.179.164. 2. 76.162 

607 DRTfi 179. 0 ^ 

O 610 POKE785.60:POKE786.3 ^ 

620 RÉM 



günk állapotát. Pl.: PRINT USR (0) vagy A$-USR(0). A kapott 
füzér az “AKTÍV” vagy a “NEM AKTÍV” lehet. 

A 19. listán az ÚJ EGYSÉGSZÁM nevű program találha¬ 
tó, mellyel a lemezegységünknek átállíthatjuk az egységszá¬ 
mát. 

A HÁNYAS A DRIVE (20. lista) futtatása után (RUN) az 
USR(x)-szel lekérdezhetjük az éppen aktív lemezegységünk 
számát. A 0 (nulla) érték a DRIVE hiányára utal. 

Utolsó rutinom a SORTÖRLŐ (21. lista) lehetővé teszi, 
hogy könnyedén töröljünk ki részeket programunkból. Keze¬ 
lése egyértelmű. 


0 

63800 

RÉM SORTORLO - JRCKIE OF TGE. 

L.' 


63810 

INPUT " 2KEDZ0 80R " K. 

21 


0 

63820 

INPUT"ZRRO 30R "iZ 

0 

63830 

IF Z<=K THEN RUN 63800 



63840 

INPUT "LEPTEK ‘ML 



0 

63850 

PR I NT " ZWWM" ; •• R=0 : K=K-L 


Ü 


63860 

FÓR 1=0 TO 9 



0 

63870 

: K=K>L 


0 

63880 

= PRINT K 



63890 

= POKE 631+1.13 



0 

63900 

= IF K>=Z+L THEN D=I=I=1E+10=R= 

= 1 


63910 

NEXT I 



0 

63920 

D=10 


0 

63930 

print"'tk;="K" =z="Z" ■ l="L" 'D=‘ 

D; 


63940 

IF R=0 THEN PRINT"'GOTO 63960" 


0 

63950 

PR I NT " S!" = POKE 198. D+1 ' END 


0 


63960 

GOTO 63850 


1 

1 

0 






Minden kedves olvasónak jó szórakozást kíván: 

JACKIE of TGE 


13 OKTÓbÉr^^ 
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KOGINFORM 


KOGINFORM 

MŰSZAKI FEJLESZTŐ KISSZÖVETKEZET 

Levélcim: 1325 Újpest 1. Pf.; 159 

Telefon: 189-6142,169-2989,160-0611 Telefax: 169-2989,189-6142 



KOGINFORM 


OKTATÓPROGRA M-K ATALÓGUS 


PROGRAM NEVE 

Komm. 

nyelv 

TÉMAKÖR (megjegyzés) Pr. Osz- 

típus tály 

Gép 

A program 
készítője 

Tér- Ár 
jesztő (Ft/adat- 
horozó) 

M. 

ék. 

Hazai halak meg¬ 
határozása 

81/66 

magy. 

Magyarország teljes halfaunáját Ismerteti. Bio- 
lógTal órákra, szakkörre ajánlott, de a horgász- 
ör^épzésben Is szerepe lehet. 


C-r4 

JVC 


TUD. 

375/K 

375/K 


Környezeti té- 
rryezők szerepe 
(Dézsa elmélet) 
SK/36 

magy. 

A növények életfeltételeit a környezeti ténye¬ 
zőknek a termelés mennyiségére gyakorolt ha¬ 
tását mutatja be. Kertészeti szakközépiskola, 
zöldségtermesztés tantárgy 1. osztályához. 

13 

C-r4 


TUD. 

313/K 


Légzés 

magy. 

Az ember légzését szemlélteti. Sz 

8,11 

C16 


NOV. 

243/K 

+N 

Növények 

származása 

több 

Előkészületben. 


IBM 


TUD. 



Növényhatározás 

BI/V-02 

magy. 

A zárvatermők törzsének fajaival foglalkozik. Gy 
Cél: a tanulókr\ak a megadott szempontok sze¬ 
rinti vizsgálattal önállóan dolgozzanak. 


TVC 


TUD. 

313/K 


Növényhatározó 

több 

Előkészületben. 


IBM 


TUD. 



Ökológiai 

programcsomag 

több 

Előkészületben. 


IBM 


TUD. 



összefoglaló— 

Barkochba... 

SK/39 

magy. 

... a zöldségfélék csoportosításáról. Szempon¬ 
tok: növényrendszertani család, élettan, gya¬ 
korlati csoportosítás, környezeti Igények. 


C+4 


TUD. 

313/K 


Palántanevelés¬ 
hez szükséges 
vetőmag SK/40 

magy. 

Vetőmagszükséglet kiszámítását Ismerteti és 
gyakoroltatja. 

Ő<ertészetl SZKI zöldségtermesztés tantárgy) 

13 

C+4 


TUD. 

/K 


Sejt 1. 

magy. 

.Sejtautomaták” témaköre — kJ. a Matematika 
pro^amoknál. 


Z48 

Agócs 

OKTA 200/K 

+N 

Sejtek 

több 

Előkészületben. 


IBM 


TUD. 



Szívműködés 

magy. 

Az emberi szív működését mutatja be. Sz 

8,11 

C16 


NOV. 

243/K 

+N 

Tejipari 

techrx)lógla 

több 

Előkészületben. 


IBM 


TUD. 



Veseműködés 

magy. 

Az ember veséjének működését magyarázza. Sz 

8,11 

C16 


NOV. 

243/K 

+N 

Zöldségfélék 

betegsegel 

SK/71 

magy. 

Kb. 40 féle betegség, ellenük való védekezés. (3y 
Növényvédelem tantárgyhoz. F 


C+4 


TUD. 

375/K 


Zöldségfélék 

csoportosítása 

SK/37 

magy. 

Megismerés, gyakorlás (Kertészeti SZKI anya¬ 
ga). 

13 

C+4 


TUD. 

313/K 


Zöldségfélék 

szárma^sa 

magy. 

A származási hely és az ebből fakadó hőigé¬ 
nyek megismeréséhez (Kertészeti SZKI 1. 

13 

Cl 6 


TUD. 

313/K 



SK/38 oszt., szőlő- gyümölcstermesztő szakma 4. 17 

osztály). 


Mindenkinek jó tanulást (tanítást) kíván az összeállítás készítője: LUQOSIANTALNÉ 
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KOGINFORM 

MŰSZAKI FEJLESZTŐ KISSZÖVETKEZET 

Levélcim: 1325 Újpest 1. Pf.: 159 

Telefon: 189-6142,169-2989,160-0611 Telefax: 169-2989,189-6142 
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PROGRAM 




PROGRAMOK 


Nyelvi gyakorló 

A program mintája lehet az oktatásban alkalmazható szó¬ 
kincsfejlesztő és gyakoroltató programoknak. Az első része 
rajzolt képek alapján kérdezi az idegen szavakat, az önmagá¬ 
ban is használható második rész pedig a magyar szavak meg¬ 
jelenítése után az idegen nyelvű szó begépelését kéri. A DA- 
TA-sorok szavainak átírásával más és más szókészleteket gya¬ 
koroltathatunk. Karakterkészletek cseréjével a képernyőn 
bármely nyelv karakterei megjeleníthetők. 

Miután a program a grafikus képernyőn dolgozik, könnyen 
megjeleníthető akár több karakterkészlet is a képernyőn egy¬ 
idejűleg. Ehhez a kiíratás előtt a $02E4-es tárcímen kell a 
karakterkészlet helyét megadnunk. A grafikus tárcímek előtt 
éppen két karakterkészlet helyezhető el. Célszerű a magyar 
karakterkészletet a $1000—$1400 tárcímre, az idegen nyelvű 
karaktereket pedig a $1400—$1800 tárcímre helyezni. Példa 
a kiíratásra: 


10 GOTO 100 

20 POKE 740, 16:RETURN: RÉM magyar karakterek, 

30 POKE 740,20:RETURN: RÉM idegen nyelvű karakterek, 
100 GOSUB 20:CHAR, x,y, „magyar karakteres szöveg”, 

200 GOSUB 30:CHAR, xx,yy, „idegen nyelvű szöveg”. 


ü 

Q 

O 

O 

O 

O 

O 

O 

O 

o 

o 

o 

o 


1 rém" *****!(t****#****************!|(***** 

2 rém"* c=ujsag s.sz.: * 

3 rém"* nyelvi gyakorló * 

4 rém"* program; lorentei janos * 

5 rém"********************************* 

6 : 

7 : 

10 color4,2: colorl.l: colorO,2; gotol210 
20 X = rnd( -ti);x = int( rnd(l) *20) +1 
30 a = dec("1000"): rem*k=keverendoszamok 
40 forz =0 tok -1: pokea +z,z +1: next 
50 forx -1 tok 

60 aa =a + int( rnd(]) *k):ab = peek(aa) 

70 bb =a + int( rnd(l> *k):ba = peek(bb> 

80 pokeaa.ba: pokebb.ab: next 

90 return 

100 graphiol,! 

110 rem*tv* 

120 char,2,2,"l 2" 

130 char,22,3."3 4 " 

140 char,3,Í0."5 6 7 

8 " 


150 char,23,14,"9" 

160 box,10,10,40,30: box,12,12,32,28 
170 box,13,30,14,40: box,36,30,37,40 
180 box,34,13,38,28 
190 rem*radio* 

200 box,55,14, 110,35: box,60,19,105,25 
210 box,60,35,65,37: box,100,35,105,37 
220 forz -60 t.o95 step6: box,z.28,z +3,29,, 


1 


: next 

230 circle,103,30, 3 

240 rero*szek* , 

250 box,140.10.142,44; box,160,29,162,44: 
box, 140,29, 162,27, , 1 

260 box,150,6,152,40: box,170,25,172,40: box 
,150,25,172,27,.1 

270 draw,140,14 tol50,10; paint,144,18 
280 rem*asztal* 

290 box,200,35,202,50; box, 280.35,282,50; 

box,200,35,282,37,,1: box,200,41,282,42 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

Q 


o 

300 

draw,200,35 to220,20 to300,20 to280,35: 
draw, 280, 44 to300,29: draw, 280, 43 to300. 

o 



28 


o 

310 

box,300,20,302,40: draw,280,37 to300,22 

o 

320 

rem*szekreny* 


330 

forz =1 to3: box,z *20,60,40 +z *20,100: 
next 


o 

340 

box, 20, 100, 40, 140: box, 80, 100, 100, 140 

o 


350 

forz =1 to3: box,40,75 +z *5,80,110 +z * 
10: next 


o 

360 

draw,20,60 to30,55 toll0,55 tollO;135 to 
100,140: paint, 30, 57 

o 


370 

rem*agy* 


o 

380 

box,120,125,220,140 

o 

390 

draw,120,125 tol20,115 tol50,100 

o 

400 

draw,140,125 tol70,110 to240,110 to240,1 
25 to220,140 

o 

410 

draw,220,125 to240,110 


420 

draw,120,115 tol40,125: draw,150,100 tol 


o 

430 

70, 110 

paint,160,130: paint,235,120: paint,121, 
124 

o 

o 

440 

rem*ablak* 

0 

450 

box, 132, 60, 213,95 


460 

forz =1 to3: box,110 +z *26,63,132 +z *2 
6,93: next 


o 

470 

paint,133, 61 

o 


480 

rem*aóto* 



490 

draw,230, 110 to230,60 to232,60 to260,60 


o 

500 

to260,120 to240,120 

draw,260,60 to240,65 to240,120: paint,24 

o 



5,90 


o 

510 

rein*l ampa* 

o 

520 

draw,280,95 to285,75 to300,75 to305,95 
to280,95: paint,285,80 



o 

530 

box,291,90,293,125: box.285.125,299,126 

o 

540 

rem*szonyeg* 

o 

550 

forz =120 tol40 step2; draw,230 -a,z to3 
19,z:a =a +3: next 


560 

char,33.16,"10" 

o 


570 

char, 21,19,". 



580 

char,1,20,"keresd ki az adott tárgy ango 

o 

ü 


1 nevet!": return 


590 

graphicl,1 



600 

rém******************************** 


o 

610 

rem*ceruza* 

o 

620 

box,40.10,120,16,,i: draw,40,16 to25,13 
to40,10: draw,34,12 to34,14: paint,32,13 



o 

630 

rem*tol1* 

o 

640 

box,40, 30,120,38, ,1: draw,40,38 to25,34 
to40,30 



o 

650 

box, 120,32, 126,36, , 1 ; box, 60, 40, 117,42: 
box,116.38.117,42 

o 


660 

rem*vonalzo* 



670 

box, 10,50, 135,70: draw,10,58 tol35,58 

o 

o 

680 

forz =10 tol35 step5; draw,z,54 toz,50: 
next 



690 

forz =10 tol35 steplO: draw,z,56 toz,50: 


o 

700 

next 

paint,11,65 

0 


710 

reni*konyv* 


o 

720 

draw,150, 10 tol90,10 tol90.60 tol50,60 

o 

730 

cirole,150,15,5,,180 

o 

740 

circle.150,65,5,,180: circle,193,17,3,,1 
50.200 

o 

750 

draw,150,70 tol95,70 tol95.20 


760 

draw. 145,15 tol45,65 



770 

cirole,193,63.4. , 200, 300 


o 

780 

paint,151,20 

o 


790 

rem*fuzet* 



800 

box,210,15,250.69,,1: boxO,222.27.238,33 


o 

810 

, , 1 

box0,220, 25,240, 35 

o 


820 

box.212,13,252,67: circle,212,15,2,,180 


o 

830 

rem*taska* 

o 

840 

box,265,30,315,69 


o 

850 

draw,265,69 to260,65 to260,25 to310,25 
to315,30: paint,300,46 

o 

860 

box, 271,20,300,22, , 1: draw, 260, 25 tol0;l 
35 




870 

box,271,20,272,28: box,300,20.301,28 

o 

o 

880 

rem*level* 

890 

box,15,80,100,140 


o 

900 

draw, 15,85 to58,115: draw, 100,85 to58.ll 

5 

o 

910 

draw,15,140 to50,110: draw,100,140 to66, 
110 



o 

920 

rem*karora* 

o 

930 

circle,180,110,15 


15 
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o 

940 

box, 110, 100,240, 120: box, 170, 105, 190, 115 

o 


950 

paint,175,111: forz =110 tol65 step3 


960 

draw,z,100 toz,120: next 


o 

970 

forz =196 to240 step3 

o 


980 

draw,z,100 toz,120: next 


990 

rem^ora* 


o 

1000 

circle, 280, 110, 25: circle, 275, 105,25, ,2 
08,50 

o 


1010 

box, 260, 128, 263, 135, 10, 1 


o 

1020 

box, 295,130,297,138,350,1 


1030 

box, 279, 88. 281,113,,! 

o 


1040 

box,275,109,295,111,,1 


o 

1050 

paint,253,110 


1060 

ram^korzo* 

o 


1070 

box,138,130,210, 135 


1080 

box, 128,131,138,134,, 1 


o 

1090 

box,138, 140,210,145 

o 

1100 

box, 128, 141, 138, 1.44, . 1 


1110. 

box,200,132,220,143,,1 


o 

1120 

box, 220, 135,230, 140, , 1 

o 

1130 

box,120,132,128,132,,1 


1140 

char, 1, 1, ** 1 *' 



1150 

char,1,4,”2" 


o 

1160 

char, 0, 7, ‘'3" 

o 


1170 

char,20,0, "4 5 6" 



1180 

char, 13, 10,"7 8 9" 


o 

1190 

char, 21,19, " 

o 

1200 

char,1,20,"keresd ki az adott tárgy ang 
ol nevet! *’: return 



o 

1210 

graphicO: print chr$(147) 

o 


1220 

char, 10, 10, " 1. első kép" 


1230 

char,10,12,"2. második kép" 



1240 

char,10,14,"3. szavak" 


o 

1250 

get keya$ 

o 


1260 

as = val(a$) 


o 

1270 

ifas =1 then gosublOO: gotol310 

o 

1280 

ifas =2 then gosub590: gotol310 


1290 

ifas =3 gotol770 



1300 

ifas >3 gotol250 


o 

1310 

k =10: gosub20 

o 


1320 

gosubl680 



1330 

forz =0 tok -l:s = peek<a +z) 


o 

1340 

char, 2, 22," 

o 

1350 

char, 2,22, str${s),l 


1360 

SS =5: char,10,22,a$(ss) +" 


0 

1370 

get keyb$ 

o 


1300 

ifb$ ="[CRS FEL]" thenss =ss +1: gotol4 
10 


o 

1390 

ifb$ ="[CRS LE]" thenss =ss -1: gotol41 

0 

o 


1400 

ifb$ = chr$(13) gotol450 


o 

1410 

ifss =0 thenss =10 


1420 

ifss =11 thenss =1 

o 


1430 

char,10,22,a$(ss) +" 



1440 

gotol370 


o 

1450 

char,10,24,a$(s),1 

o 

1460 

ifs =ss then char,5,22,"ok": gotol480 


1470 

z =z -1 


o 

1480 

fori =1 tolOOO: next 

o 

1490 

char, 10,24," ": next 



1500 

k =10: gosub20 


o 

1510 

gosubl680 

o 

1520 

forz =0 tok -l.s = peek(a +z) 


1530 

char,2,22," " 


o 

1540 

char,2,22, str$(s),l 

o 

1550 

char,10,22," 


1560 

s$ char,10,22,s$ +"<" 


o 

1570 

poke239,0: get keyb$:sz =sz -fi: ifsz >2 

0 gotol630 

o 


1580 

ifb$ = chr${20) gotol550 



1590 

ifb$ = chr$(13) gotol630 


o 

1600 

s$ =s$ f-bS 

o 


1610 

char,10,22, s$ +"<" 


1620 

gotol570 


o 

1630 

char,10,24,a$(s),1 

o 

1640 

ifs$ =a$(s) then char,5,22,"ok": gotol6 
60 



o 

1650 

Z =2 -1 

o 

1660 

fori =1 tolOOO: next 


1670 

char,10,24," ": next 


o 

1680 

ifas =1 then restorel710 


1690 

ifas =2 then restorel740 

o 


1700 

forz =1 tolO: reada$(z): next: return 



1710 

datatv,rádió,chair, table 


o 

1720 

datahanging,windOw,door, lamp 

o 

1730 

databed,carpet 


1740 

datapencil,pen,ruler, book 


o 

1750 

dataexercise-book,bag,letter,watch 

o 

1760 

dataclock,korzo 


O 1765 rém******************************* 

1766 rém-szokereso- 

1767 rém* ******♦♦♦***********♦*♦ J*!*#**** 

o 1770 ditnsm$(50),sa$(50) 

1780 graphicl.l: char, 2,4, "var j !" 

1790 char, 2.3," . " 

Q 1800 k =50: gosub20:z =1 
1810 restore2130 
1820 reads$ 

Q 1830 sm$(z) =s$:s =s +1 
1840 reads$ 

1850 sa${z) =s$:s =s +l:z =z +1 
^ 1860 ifs <100 gotol820 
1870 graphicl,! 

1880 forz =0 tok -l:s = peek(a +z):sz =0:s$ 
O 1890 char, 2,5,". 

1900 char,2,6,"Írd be a szót angolul !" 

1910 char,2,14, "ÜCCCCCCCCCCCCCCCCCCCCCCCCCCC 
O CCCCCCCCCI" 

1920 char,2,15,“| 

I" 

O 1930 char,2,16,"JCCCCCCCCCCCCCCCCCCCCCCCCCCC 
CCCCCCCCCK" 

1940 char,2,9,"UCCCCCCCCCCCCCCCCCCCCCCCCCCCC 
„ CCCCCCCCI" 

^ 1950 char,2,10,"1 

I " 

1960 char,2,11,“JCCCCCCCCCCCCCCCCCCCCCCCCCCC 
O CCCCCCCCCK" 

1970 char, 10,20, " 

1980 char, 10, 10, sin$( s), 1 
O 1990 char,10,15," 

2000 s$ ="": char,10,15,s$ +“<" 

2010 ks =0; poke239,0; get keyb$:sz =sz +1: 

Q ifsz >20 goto2080 

2020 ifb$ = chr$(20) thensz =sz -2:ks =l:b$ 

2030 ifb$ = chr${13) goto2080 
2040 s$ =s$ +b$:sk = len(s$) 

2050 ifks =1 andsk >0 thens$ = left$(s$,sk - 

‘-' 2060 char, 10,15,s$ +“< “ 

2070 goto2010 
2080 char, 10,24,sa$(s), 1 
O 2090 ifs$ =sa$(s) then char.10,20,"ok": goto 
2110 


U 

O 

O 

O 

O 

O 

O 

O 

o 

o 

o 

o 

o 

o 

o 


o 


2100 ph =ph +1: char,20,2,"hibapont:" + str$( 
Q z +1) +"/" t str$(ph) +" ":z =z -1 

2110 fori =1 tolOOO: next 
2120 char,10,24," ": next 

2130 rem*szogyujtemeny* 

2140 datakenye’r,bread,tej,miIk 
2150 datacsokola’de’,chocolate,cukor,sugár 
2160 dataso',salt,alma,apple 
^ 2170 dataparadicsom,tomato,burgonya,potato 
2180 dataleves,Soup,hu's,meat 
2190 datavaj.butter,toja’s,egg 
O 2200 datasonka, ham, vi ’ z, water 

2210 dataszalnnna,bacon,hagyma,onion 
2220 dataital, drink, gy>imolcs, f ruit 
Q 2230 datareggeli,breakfast,ebe’d,lunch 
2240 datavacsora,dinner, bor,wine 
2250 dataollo',scissors, villa, fork 
Q 2260 datakana’1,spoon,ke’s,knife 
2270 datapoha’r,glass,palack,bottle 
2280 datakesztyu,glove, cipó, shoe 
229Ó datanadra'g,trousers,ing,shirt 
2300 datakaba’t,coat,szoknya,skirt 
2310 datazokni,sock, sapka, cap 
2320 datakicsi,1ittle,köve’r,fát 
O 2330 datasova’ny,thin,nagy,big 

2340 dataalacsony,smal1,magas,tál1 
2350 datale,dovnn, fel, up 
O 2360 databal,left,jobb,right 

2370 datae'szak,north,de’1,South 
2380 datakelet,east,nyugat,West 

O - 


o 


o 


o 


o 


LArentei János 


EPROM-SZERKESZTŐ 

Az EPROM-ba helyezendő utolsó program mindig túl 
hosszú — mondja a Murphy-törvénykönyv. Ez engem is rég¬ 
óta bosszantott, ezért készítettem el a mellékelt szerkesztőt. 
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PROGRAM 


elsősorban a DELTA niodulgenerátorral programozók részére. 
A megvalósítás alapötletét a 1541-es kézikönyvből merítet¬ 
tem. A listát minden szükséges magyarázattal elláttam, ezért 
inkább a program által nyújtott szolgáltatásokat részJetezem. 

1. DIRECTORY — segítségével munka közben megnézhe¬ 
tő a lemez tartalomjegyzéke, anélkül hogy a tárban lévő prog¬ 
rammunkát felülírnánk. 


2. SZERKESZTÉS — a funkció először bekéri a megvizs¬ 
gálandó program nevét. Mivel az azonosságot a karaktcrlán- 
cok összehasonlításával vizsgálja, joker (*) nem használható; 
a megadott fUe nevének karakterenként egyeznie kell a leme¬ 
zen lévőével, ellenkező esetben 440. sor. A fiié hosszát a tárba 
való beolvasás nélkül, a blokkok láncolási elve alapján állapít¬ 
ja meg. Ezután kiírja a file-paraméterek táblázatát. A kezdő¬ 
cím meghatározási módja a szokásos. 


O 100 RÉM" *♦♦*♦♦♦♦♦♦***♦*♦*♦♦♦♦**♦♦♦♦*♦***♦** 


110 RÉM" * EPROM SZERKESZTŐ C G4 ♦ 

^ 120 RÉM" * * 

^ 130 RÉM" • BY HORLASOFT, 198S.XII. IRODAUOMí 1541 KÉZIKÖNYV * 

140 RÉM" ♦ * 

O 150 reM" ♦ C= ÚJSÁG sorszám: * 


160 REM" *********************************** 
O 170 GOTO200 

180 GETlta ,X*i IFX*=* "THENX*=CHR*<0> sREM"* BYTE BEOLVASÓ SZUBRUTIN 
^ 190 RETURN 

^200 OPENl , 8 , 15,"M-U"+CHR*<7)+CHR»<28)+CHR*<1)*CHR*<15):CLOSElÍREM"* FÁST STEP 
210 DIMF*<15),KC<15),HO<15)IN=1iM=1312iBE=57:REM"* MAX.15 FILENÉV LEHET ! 

C' ae0 REM"* ’M' A MENÜPROGRAM HOSSZA - ‘BE* A BETÖLTŐ RUTIN HOSSZA 
230 PRINT",JÍ A HORLASOFT ÜDVÖZLI A FELHASZNÁLÓT <mi" 

0240 PRINTSPC<11)"a ■IPRINTSPC<11)"a EPROM SZERKESZTŐM" 

250 PRI.NTSPC< 1 1 ) "M ":GOSUB920 

Q 260 GOSUB750iPRINT"J" ÍREM"* FŐPROGRAM KEZDETE,MENÜ KIÍRÁSA 
270 PRINT"*Í 1 - DIRECTORY 2 - SZERKESZTÉS M" 

280 PR INT" 3 - TÖRLÉS 4 - TABLA 5 - úJ EPROM" 

^ 290 UIAIT198,1 sGETA*iONVAL<A»)GOTO320,330,7I0,310,2S0 
300 GOTO290 

O 310 PRINT" J" :N=N-1:GOTO570 

320 FL=1:PRINT" J" :GOTO340:REM"* DIRECTORY-T KÉRTEK ? 

0 330 FL=0iPRINT"U" IINPUT"A FILE NEVE ";F*<N):PRINT"»<ERESEM !":REM"*VAGY FILE-T? 
340 OPEN15,8,15,"I0 "iOPEN2,8,2,"*»*:T=18iS=1:REM"* ITT A DIRECTORY A LEMEZEN 
350 PRINT«15, "B-R";2;0;T;S:PRINTI»15, "B-P";2;0:GOSUB180:T=ASC<X*) IGOSUB180 
^360 REM"* FILE NÉV MEGKERESÉSE ÉS BEOLVASÁSA 

370 S=ASC<X*):FORX«0TO7iPRINT#15,"B-P";2;X*32+5iFF*="":FORY=0TO15 
O 380 GOSUB180IIFASC<X*)=160THEN400 
390 FF*=FF#+X*:NEXTY 

0400 IFF«<N)=FF*THEN470:REM"* MEGVAN A KERESETT FILE ? 

410 IFFLTHENPRINT" "FF* 

Q 420 NEXTXiIFT-0THEN440 
430 GOTO350 

440 CL0SE2ICL0SE15: IFFL=0THENPRIt>rT"MA FILE NEM LÉTEZ IK !" i F*<N) = "": GOTO270 
^ 450 IFFLTHEN270 

460 REM"* AZ X. FILE 1. ADATBLOKKJÁNAK HELYE 
O 470 PRINT"MMEGTALALTAM ! " i PR INTtt 15 , "B-P " ; 2; X*32+3: GOSUB 180: DT=ASC <X*) 

480 GOSUB180iDS=ASC<X*) : 0PEN3,8 ,3 , : PR INT« 15 , "B-R " ; 3;0; DT.s OS 

O 430 PRINTttl5, "B-P"l3;2iGETt»3,X*: IFX*=" "THENX*=CHR*<0) ÍREM"* ITT VAN A KEZDŐCÍM 
500 LB=ASC<X*)i6ET«3,X*iIFX*=*"THENX*=CHR*(0) 

^ 510 HB=ASC<X*)*256iKC<N)=LB+HB:CLOSE3:PRINTiB=0 
° 520 REM"* UTDLSó BLOKK MEGKERESÉSE KÖVETKEZIK 

530 PRINT«15, "B-R"í2J0,'DT,*DSiPRINT» 15 , "B-P " 2) 0 i GOSUB 180 : DT=ASC <X*) i GOSUB 180 
O 540 DS=ASC<X*)iB=B+l iPRINTB;IIFDT= 0THENCLO8E2iCLOSE15iGOTO560 
550 GOTO530 

O 560 PRINT"BLOKKMM"IH0<N)=<B-1)*254+DS-3iREM"* FILEHOSSZ KISZÁMÍTÁSA 

570 PRINT" aVALASZTOTT EPROM: 27*VE"■=>"E"BYTEM" iREM"* PARAMÉTER TABLA KIÍRÁSA 
580 PRINT" FILENéV KEZDŐCÍM HOSSZ"i60SUB910iZ=0 

^ 590 FORI = lTONiD=KC< I ) :KH*=STR*<KC<C I ) ) :H=LEN<KH*) 

600 PRINTI;F*<I)TAB<25-H)KC<I)"*";:GOSUB870 
O 610 HO*=STR*<HO< I ) ) iH=LEN<HO*) :PRn'nrTAB<38-H)H0< I ) iZ=Z+HO< I ) : t-lEXTi G0SUB9 10 

620 SH=E-<M+Z)-<N*57)+<N-l)iBS=INT<SH/256*10+0.5)/10:REM"* SZABAD HELY KISZAM. 
O 630 IFSH<0THENPRINT"NJNCS ELÉG HELY ! VÁLASSZ úJ EPROMOT !M" 

640 IFSH<0THENGOSUB760:PRINT"Ü"IGDTO570 
* 650 PRINT" SZABAD HELY i"SH"BYTE "BS "BLOKK " i GDSUB9 10 i N=N+1 


o 

o 

O 

o 

o 

o 

O 

o 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

O 

O 

o 

o 
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o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


G60 PRINTSPC<10>"KINYOMTASSAM ? 

B70 GETXí;: IFX»<>" I "ANDX*<>"N"THENG70 
680 IFX*="N"THENe70 
690 SYS49152:0070270 

700 RÉM"* FÖPROGRAM ViíGE # ALPROGRAMOK KÖVETKEZNEK * 

710 PRINT:INPUT'FILE SORSZÁM "JS0:REM"* FIUE TÖRLÉS 

720 IFSO>N-1ORSO<=0THE1'IPRINT"»^INCS ILYEN FILE !":GOTO270 

730 F0RK=S0T0NiF*<K>=F*<K+l>:KC<K>=KC<K+1):HO<K)=H0<K+1>:NEXT 

740 N=N-2:PRINT:GOTO570 

750 PRINT" MMMM EPROM VÁLASZTÁS :flH" 

760 PR INT" 1 - 2716 2 - 2732 3 - 2764 ü" 

770 PR INT" 4 - 27128 5 - 27256 6 - 27512" 

780 UIAIT198,1:GETA*:E=2048:VE=16:ONVAL<A*)GOTO850,840,830,820,810,800 
790 GOTO780 

RÉM"* VÁLASZTOTT EPROM MÉRET ÉS TÍPUS MEGHATÁROZASA 


E=E*2:VE=VE»2: 

E«-E*2:VE=VE*2 
E=E*2:VE=VE*2 
E=E*2:VE=VE*2 
E=E*2:VE=VE*2 
850 RETURN 

860 RÉM"* DEC-HEX ÁTSZÁMÍTÁS 

870 H< 1 >»INT<D/4096> :D=D-H< 1 ) *4096«H<2 > = INT<D/'25G ) : D=D-H <2 > *256 
880 H<3) = INT<D/16> «D>=D-H<3)*16iH<4>=D 

FORA=lTO4:P<A>=0iIFH<A)>9THENP<A)=7 
H*':A ) =CHR*<H < A ) +48+P < A ) > : PR INTH*! A ) ! t NEXT: RETURN 
PR INT" -"I RETURN 


800 

810 

820 

830 

840 


890 

900 

910 


920 FÓR I-49152T049245:READA:POKEI,A:NEXT:RETURN:RÉM"* HARDCOPY RUTIN 
930 DATA 169,4,133,186,169,126,133,184,169,0,160,4,133,113,132,114,133,183,133 
940 DATA 185,32,192,255,166,184,32,201,255,162,25,169,13,32,210,255,32,225,255 
950 DATA 240,46,160,0,177,113,133,103,41,63,6,103,36,103,16,2,9,128,112,2,9,64 
960 DATA 32,210,255,200,192,40,208,230,152,24,101,113,133,113,144,2,230,114 
970 DATA 202,208,205,169,13,32,210,255,32,204,255,169,126,76,195,255 

980 RÉM"* KONTROLLöSSZEG TESZTELÉSHEZ: 12023 - 

READY. _- 


o 

o 

o 

o 

o 

o 

o 

o 

n 

o 

o 

o 

o 


3. TORLÉS — fontos funkció; ha szerkesztés közben ki¬ 
derül, hogy a programot mégsem akarjuk az EPROM-ba he¬ 
lyezni, vagy másikra akarjuk cserélni, segítségével könnyen 
megtehetjük. Bármelyik fiié bármikor törölhető, csak a sor¬ 
számát kell megadni. A program elvégzi a törlést, újra kiszá¬ 
mítja a szabad hely nagyságát, és kiírja az új paramétertáblá¬ 
zatot. Egy fiié csak egyszer törölhető, és ha mindent töröltünk, 
a program akkor sem bolondul meg. 

4. TÁBLA — általa megjeleníthető a szerkesztés állása a 
munka bármely fázisában. Lehetőség van a táblázat kinyom¬ 
tatására egy ismert hard copy rutin segítségével. így nagyon 
egyszerűen jutunk esztétikus másolathoz. 

5. ÚJ EPROM — összeállítás közben előfordulhat, hogy 
egy program túl hosszúnak bizonyul, s már nem fér el a kivá¬ 
lasztott EPROM-ban. Mód van az EPROM típusának menet 
közbeni megváltoztatására; a szerkesztő ekkor újraszámol 
mindent. A szabad hely nagyságát állandóan figyeli, hiányára 
figyelmeztet. 

így tehát egyetlen ceruzavonás, egyetlen összeadás kivo¬ 
nás nélkül kényelmesen kiszerkeszthető, mi is fér még az EP- 
ROM-ba! A gyakorlati felhasználáshoz célszerű a tervezett 
programokat egy lemezre kigyűjteni, a munka így sokkal 
gyorsabb és egyszerűbb. 

Begépeléskor a REM-sorokat el lehet hagyni, tesztelés 
után javaslom a HELP PLUS #C parancsával a programot 
tömöríteni. így mindössze 2596 byte-ot foglal el egyik leendő 
EPROM-unkban. 

Azok, akik egy más típusú modulgenerátort használnak, 
szoftverjüknek megfelelően módosítsák a 210., illetve a 620. 
sor adatait. 

A szerkesztő felhasználásával több EPROM-ot is készítet- 


o VÁLASZTOTT EPROM: 57 128 -> 16384 BYTE 


FILENEV kezdőcím HOSSZ 


1 

RAM-EXOS 

2049 

*8801 

2493 

2 

HBS DISK-MANAGER 

2049 

*0801 

8231 

3 

SUPERM0N-e4 

2049 

*0801 

2538 

4 

PROGRAMM-LADER 

2049 

*0801 

1495 

5 

SYSTEM RÉSÉT 

2049 

*0801 

13 


O SZABAD HELY i 21 BYTE I .1 BLOKK 



tem, mellékelten megadok egy megvalósított 16 kilobyte-os 
cartridge összeállítást a leírtak illusztrálására. 

Horváth László 


A 1541-es meghajtó 
vizsgálatai 

1. Az indikátor LED-vizsgálata 

A 1541-es meghajtó megfelelő működése a legtöbb fel¬ 
használó esetén természetes állapotnak tekinthető. Ugyanak- 


o 
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kor azzal is tisztában vagyunk, hogy eszközeink egy idő után 
meghibásodnak. A meghibásodás lehet katasztrofális (teljes 
üzemképtelenség) vagy degradációs (az eszköz a gyári speci¬ 
fikációt már nem teljesíti, de még működik). Természetesen 
katasztrofális hiba esetén nem lehet mást tenni, mint javítani. 
Degradációs hiba megjelenésekor a nem szakember találgatni 
kezd, hogy valamit nem megfelelően csinált hiányos ismerete 
következtében. De feltételezheti azt is, hop' a meghajtó nem 
működik tökéletesen. Ezen kételyek elhárítására már egysze¬ 
rű szoftverek alkalmazásával is elvégezhetünk néhány jelen¬ 
tős vizsgálatot. 

Ezek a következők: 

— az indikátor LED-vizsgálata; 

— az írásvédelem vizsgálata; 

— a fejléptetés és ütközés vizsgálata; 

— a lemezsebesség és meghajtószíj lötyögésének vizsgálata; 

— írás és olvasás működésének vizsgálata. 

A következő kis program az indikátor LED-vizsgálatára 
szolgál. 


2. A program leírása 

Az 1541-es meghajtó bekapcsolásakor teljes ROM- és 
RAM-vizsgálat kerül végrehajtásra. A ki- és a bemeneti ára¬ 
körök automatikus vizsgálata azonban nincs megoldva. Egyik 
igen hasznos elem a lemezmeghajtón a LED indikátor, amely 
lemezre íráskor és olvasáskor folyamatosan piros színnel vilá¬ 
gít, míg hiba esetén folyamatosan viliig. A vizsgáló program 
segítségével a LED vezérlése és működésé egyértelműen elle¬ 
nőrizhető. A programot célszerű a lemezen kívül kazettán is 
tárolni, hogy a C64-be hibás meghajtó esetén is betölthető 
legyen. A program Basic nyelven készült, kiegészítve két da- 
ta-sorokba írt gépi kódú résszel. Az első rész 850—880 sorok¬ 
ban a LED ki- és bekapcsolását hajtja végre. A második rész, 
900—1010 sorok, a LED-et vezérlő gépi kódú programot tölti 
be a lemezmeghajtó hexa 300-as címmel kezdődő puff erébe. 
A Basic program rész menüvel indul és mindig tájékoztat a 
további lehetőségről. A programban elhelyezett REM-ek tá¬ 
jékoztatnak arról, hogy az adott rész éppen milyen funkciót 
tölt be. 
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RÉM* K-********** ********** *** 
REM*LED INDIKÁTOR VIZSGALAT* 


RÉM* 

RÉM* 

RÉM* 

RÉM* 

RÉM* 

RÉM* 


HORVÁTH JOZSEFNE 


1989 


* 

* 

* 

* 

* 

BUDAPEST * 

RÉM************************* 

IFXX=OTHENX X°11GOSUB850 
PRlNT"n"sIE-2*4096+15*256 

P0KE53280, t :POKE5.328l , I iPRINTCHRÍ (28) ;PRINTCHR*< 142) 
034:=CHR»<3> 

NC=4sCH$:<2)="I”tCH*<3)'="N":CH*(4)=^"R":CH*<5)='’ *’ 
CH=08iFLt="SIKERTELEN A":PS*-"BEFEJEZŐDÖTT A" 
MQ=0:S=OtPRINTTAB(7)"N *** MENÜ ***" 

PRINTTAB<7) “Wl - INDIKÁTOR VIZSGAI.AT" 

PRINTTAB<7)"2 - PROGRAM BEFEJEZES" 

PRINTTAB<7)"•MELYIKET VÁLASZTOD?" 

GETAFíIFA*=""THEN290 

S'=VAL(A*)tMQ=l5 IFS<1 OR S>2 THEN 290 
G0SUB840I0N S GOTO 320,350 
8'=lcGOSUBS20iREM LED 

PRINT"r»ZEGE A VIZSBALATNAK":FORI'»lT0700«NEXTtRUN200 
RUN200 
END 

GETA*iIFA*<>""THEN360 
GETAFíIFA*=""THEN370 
IFIN=OTHEN11=0 í G0T0410 
IFA»< >CH* <IN)THEN370 
IN=0:RETURN 

II-II+liIFII>NCTHEN370 
IF CH*(11>< >A*THEN410 
RETURN 

PRINT":*NE LEGYEN LEMEZ 
GOSUB4ÓOI G0T0.360 
PR INTLEFT* <LI.* , LEN (OU*) ) 

PR I NT " a" oiJ»" ;»r' t return 

PRINT":N"OU4i RETURN 

PRINT“:*BZOKOZZEL FOLYTATNI, R'-EL 
NC=5iG0SUB36OJ ONII60T0340,500,500 
NC=4tIT=I1-4tRETURN 
PRINT"n"tREM LED VIZSGALAT 

LF=0:PRINTDR“-AS MEGHAJTÓ INDIKÁTOR VIZSGALATAW" tG0BUB440 
G0SUB780iREM A GEPlKÖDU PRG BEVITELE A ♦.30O-AS PUFFERBE 
OU*="A LED KIKAPCSOLVA ? (I/N)" 


A MÉGHAJ TÓBA!"iRETURN 


ISMÉTELNI' 
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*iG0BlJB460 


? <I/N>" 


LED VI7SGALAT"tOU»=PSC+DV» 


A DATASORBAN":END 


Z=0 


o 


o 


lOOO IFZ<>17610THENPRINT"HIBA A DATAGORBAN”lEND 
lOlO RETURN 
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READY. 


Öröknaptár, 

mely 1600-tói 2200-ig érvényes. Kiemelném a program kép¬ 
ernyő részét, valamint a program két különleges szolgáltatá¬ 
sát; kiszámítja, hogy az adott évben a húsvét vasárnap hánya¬ 
dikán van, valamint azt, hogy a keresett nap az évek folyamán 
(egészen 2000-ig) a hét mely napjára esik. Meg lehet nézni, 
hogy valamely ünnep mikor esik szombatra vagy vasárnapra. 


A program kezelése egyszerű. A nyitó képernyőn csak a 
dátumot kelt a villogó kérdőjelek helyére beírni. A hónapokat 
és napokat két számjeggyel kell begépelni a helyűkre. A dátum 
begépelése után a program automatikusan kitölti a táblázatot. 

Dobrosi János 


„ le RÉM #*-*****#**»**!«Ht'.*****íi<**;ií*»;*;t!» 

o 20 RÉM m OROR.MMPfMR. tíV í. ŰÜBR.ŰSX ^ 

30 RÉM ♦ 1600-2200- í;G -V2. 10- * ^ 

40 RÉM 

O 50 COLOR 0.2.4:COLOR 4.2.4’V=65286 ^ 

60 Q.Í-='‘ t I--1--»- i -■»-1-1-1 1 " O 

70 m=" ti t t t I I I 11 " 

O 80 Zt—" --- 

S0 OfiTfi 162.000.160.000.024.032.240.255.036 Q 

100 OH'ffi 202.203.203.204.204.205 
„ 110 FÓR 1=208 TO 216 

O 120 REfiO R’POKE I.B O 

130 me;><t I 

140 OfiTFl SZOMBRT .6.VRBBRHHR .Z.HÉTFŐ . 1. KEDD .2 
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15Ö ORTfl SZEROfl . 3, CSÜTÖRTÖK., 4. FEHTEK . <5 

160 RR i HT CHRí <. 8 > . CHRí <. 142 > ; " 11" ’ OOSUB 980 

170 REH m*** IHP. EV 

180 ROKE 209.5=FOKÉ 211.3’3VS 208 

190 FRIHT ; ‘EV$="" 

200 FÓR 1=1 TO 4 

210 OETK.EV ES- =1F E3-=CHR:ir<.20> VHEÜ 180 
220 IF Eí<'‘0" OR Eir>"9" THEN 180 
230 IF 1 = 1 RHO Eir = "0" THEH 180 
240 EVí=EVí+Eí-'PRIMT E¥; 

250 HEXT I =EV=VRL<.EVí > = VE=ev 

260 IF EVCieOO OR EV>2200 THEH 180 

2'70 REH ihF. HOHHF 

280 FOKÉ 209.5'FOKÉ 211.11= SYS 208 

290 FRIHT "W> ?»íllll" ; =HOir = "“ 

300 FÓR 1=1 TO 2 

310 GETKEV Har =IF H‘-r=CHRír<.20> THEH 280 
320 IF Hí<"0“ OR Hí>"9" THEH 280 
330 HOsr=HOír+Hír = FRIHT Hí; 

340 HEXT i =ho=vhl<:hoí;' 

350 IF HOCl OR H012 THEH 280 
360 RÉM IHP. HHP 

370 P0F;E 209.5 = POF É 211.20= SV^3 208 
380 FRIHT "ir??BÍ«l" ; =HHí=" " 

390 FÓR 1=1 TO 2 

400 OETK.EV Hí=IF Mír=CHRí':.20> THEH 370 
410 IF Hí<“0" OR. Hí>"9" THEH 370 
420 HHÍ=HHí-»Hí = FRIHT Hí; 

430 HEXT I =HH=VHL<.HHí,== 

440 IF HHCl OR HH>3l THEH 370 

450 IF HH>38 THEH IF HO=4 OR H0=6 OR HO=9 OR HO=ll THEH 370 
460 IF HH>28 HHÜ H0=2 THEH IF EV/4=::> itTr«:.EV/4-' THE-H 370 

470 IF HH>28 HHO H0=2 HHO EV/100=1HT CEV/lOO-' THEH IF EV/400'C> lH V<.EV/400;« 

480 GOSUE: 880 

490 RÉM OüTFüT 

500 FOKÉ 209.5=FOKÉ 211,27=SYS 208 

510 HX=HO = HX==HH = FRIHT Tí 

520 V=31= HH=1= EV=VE = OOSUB 880 

530 F'OKE 209.11=FOKE 211,5».H-1 = SYS 208 

540 FRIHT "01";=1=1 

550 IF fi>=7 THEH 590 

560 FÓR 1 = 1 TO 7-H •' 

570 FRIHT "»**KJ"+CHRí':.49-Fl ; 

580 HEXT I 

590 PRIHT = PR1HT = L=0 

600 IF HO=2 THEH S‘=28 

610 IF H0=4 OR H0=6 OR H0=9 OR. H0=11 (HEH Y=30 
620 IF VE/4=IHT<:VE/4;* HHO HO=2 THEH V=23 

630 IF VE/10Ű=IHT(.VE/100;> HHO VE/400<> IHX<. VE/4Ö0> HHÜ H0=2 THEH Y=28 
640 FÓR. .J=l TO 5 = FRIHT "»l" ; 

650 FOKÉ 209. lH'.J»2 = FOKE 211.1= SYS 2Ü8 

660 FÓR. K=1 TO 7 11 = 1+1 = Mí=ChRí':;48 +l;=+CHRí (.48+1 > 

670 IF VHL<'.Mí>>Y THEH 720 

680 FRIHT "|i»IIH"+Mí; = IF 1=9 THEH I=-1=E=L>1 
690 HEXT K=FRIHT=FRIHT 

700 he>=;t .J 

710 R.EM HÜSVET 

720 X=IHT<.VE/100> =0=X-6= IF X>=20 THEH 0=0-1 

730 R.EST0R.E lOO 

7’40 FÓR 1=0 TO 0-10 

750 R.EHD M 

760 HEXT I 

780 0.= IHT<;VE/4;' = H=VE-l9i«<. 1HT<.V£/19.-' ;■ =X2=M- 1 Ü*iH 

7'90 B=X2-30*<IHT<:X2/30>;'= IF MO203 THEH IF B=29 OR B=28 THEH 6=6-1 

830 IF HP>31 THEH HF=HF-31=HHí="RPRILiS" 

840 MFí=R10HT íCSTRí <.MF> . 2> 

850 CHRR. ,19,23. HHí = CHRR. . 27.23. HPí 

860 GETKEV lí-IF lí=" " THEH FRIHT ":3"=G0T0 1170=ECSE RUH 
870 RÉM :*■*■*■■*■* S;ZRMITRS 
8.80 i (T=HH + .3 i •'F '. Ku- i / 3i:,5i*EV 

8©0 IF H0>2 THEH 1H=IH-IHTCO. 4;«HO+2. 3;< = GOTO 910 
900 EV=EV-1 

910 I H= IH+ 1 HT ( EV.--4 > = X= l HT (. EV.' 1OO ;■ + 1 

920 IH=IH-IHT<;0. ■75*X> = ÍM=IM-1MT< IH.'7>»7 

930 RESTORE 140 

940 FÓR .1=0 TO IH 

950 RERD TÍ.R 

960 HEXT -1 

970 RETUP.1'4 

980.RÉM OISPLRY 


990 FOKÉ Y,PEEK<;Y> HHO 239 


1O00 
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FRIHT" 
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•ERVEHYE8 1600.01.01 
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11>JÜ PKIHT 
1110 PRIHT 
ll-dlú PR INT" 
1130 PR INT" 
1140 +--P.IHT" 
1150 PR.INT" 
POK.E V 
PR INT 
PR INT 


Q$-.Wí.Q5-.H<rC!5-W4-Qsr-W3:QíWÍ- 
t t.—.t-P 

i ( 


-! ! 


I 


1 ilfcvlT^is^fOVNBB; ffitGVEBW=R.UN 1 ( 


1 


( 


l íiaií-lUSVeT VNSHfíNPt'.-EN V'PlNm ! 


KOZOTT. " ^ PR.INT Z» 
VEGE- C!rjRrN*> O-IRB" 


PEEK < V > ÜR. 16 = RETURN 

n Pl KERESETT ON'T.OM NRPIPlNRK P.ISZl=!t'!l TPiSh. ' 

'tt( 15*00. " H0:ir-" . " NP14^" . - 2200. •'NOt “ . " NHs' 

CHRR..0,22,ZílPCHNR.. 0.23, " <raSPCK> TOVBBB, CfiíiO NiI 
L=1BS'0 ■ HO=HX = NR=NX 

IP FL=0 THEN P'L=1'P'0KE 2021.21 O'-'OKE 2022.. 4 POKE 202.3,0=POKE 2024, 13 • PR.INT 
:'T‘,-G0T0 1230 

1220 FL=0 = POlí.E 2021,21’ POKE 2022., 4 POR.E 2023,20 '■ POF.E 2024,33 = PR.INT " LT“ ; 


1160 
1170 
1180 
1130 
12PJ0 
1210 


„ 1230 POR K=0 TO 16 

O 1240 £V=L-i K’EV9r-=STP.!í' <:;EV>’űOSOB 880 

1250 ÍF THEN űB=OB+1 = I3i-=’‘íll" •PPT+" M" 

1260 IF fi=7 THEN ŰB=0B-H Tír="iai" *■ Vsr-+ 

O 1270 PRIHT EV*". "Tt’íF P;v>2200 THEN 1310 
12P*0 NEKT t'. 

1230 IF' FL=:0 T HEN GETF.EV I * ’ 1F i -T--OHR* <; 1:3 ;> T HEH 1 :.i 10 
n 1300 L=L+1?’IF L-C2S:00 THEN 1210 

^ 1310 PR INT " íim MONKFtóZONETl NHPR.H ESIF.’"UB" HHP . H" FF'. 1 NT " 44=1" ■■ UE l KEV 1* -R.'.JN 
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Gyakorlati statisztikai 
számítások 

(C 64-es számítógépre) 

A mérnöki és közgazdasági, orvosi 
stb. gyakorlatban nagyon sok statiszti¬ 
kai jellegű adat feldolgozására van szük- 
ség. 

A könyv első részében a gyakorlat 
szempontjából legfontosabb próbák és 
elvégzésüket megkönnyítő programok 
ismertetésére kerül sor. A második rész¬ 
ben a különböző alakú, egyszerű függvé¬ 
nyek illesztésére, ül. adatok közötti 
összefüggések vizsgálatára mutatnak be 
a szerzők a gyakorlatban is jól használ¬ 
ható eljárásokat és programokat. A 
könyvhöz lemez is vásárolható. 

Ára: 390,- Ft. • 

Lemez ára: 263,- Ft. 

Megjelent: 1989. 



Homonnay P.: 

Angol — magyar számí¬ 
tástechnikai szótár 




A Lynx 

Erre a névre keresztelte az Atari a 
legújabb játékkomputerét, amelyet elő¬ 
ször a február 8. és 14. között Nümberg- 
bcn megrendezett játékvásáron állítot¬ 
tak ki. A gép nem nagyobb, mint egy 
zsebnaptár, mégis kiváló 3D grafikára 
képes. A 3 1/2 collos képernyő forgatha¬ 
tó, a zenét fejhallgatón keresztül is él¬ 
vezni lehet. A legnagyobb szenzáció 
mégis az, hogy egy speciális kábel segít¬ 
ségével maximum nyolc rendszer össze¬ 
kapcsolható! Mondjuk egy autóversenyt 
így egyszerre nyolcán, a saját gépükön, 
valós időben egymás ellen küzdve játsz¬ 
hatnak le. A Game-Card (játék) modu¬ 
lok kicserélhetők, a készülék kb. 399 
márkás árában a Califomia Games négy 
játéka benne foglaltatik. További prog¬ 
ramokat is beígértek, így a Lynx lesz a 
világ első hordozható digitális modulja. 

Információ: Atari Computer GmbH, 
Frankfurter Strasse. 89—91, D—6096 
Raunbeim. 


A hozzávetőlegesen 3000 szót tartal¬ 
mazó szótár az angol nyelvet nem isme¬ 
rő számítógép-használóknak nyújt ko¬ 
moly segítséget. Nemcsak a számítás- 
technikai szakkifejezések, hanem a 
munka közben előforduló angol szavak 
magyar megfelelőit is megtalálhatjuk a 
szótárban. 

Ára: 79,- Ft. 

Megjelent: 1989. 
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TÁJOLÓ 


Mi náx* tudonásul vettük^ liofry 

életünk szerves részévé vált 
3i száni tás tecbn ikat 



2C Aru]ia.z 
1136 Budajpest 
Balzac u. 35 . 
tel.: 14-02-954 
Mini 2C 
3530 Miskolc 
Vörösnarty u. 51 
tel.: 46-86-538 


4-C 




AMIGA 500 
RP Modulátor 
A1084S Monitor 
20Mbyte H^ddisk 
Printer kábel 


4-C 






mm 




üi 





imocodcL 


Tradíng Company 


1088 Budapest, 
Rákóczi út 25. 
Telefon: 1-182-972 
1-381-139 
Telefax: 1-182-972 


6000 Kecskemét, 
Március 15. u. 14. 
Telefon: 06/76/47-626 




Iskolaszámítógép-szerviz 
és Kereskedelmi Bt. 

C= számítógépek és perifériák 
javítása és eladása 
JOYSTICK-JAVÍTÁS 
ÁTALÁNYDÍJAS javítás kedvező áron 
C=16 bővítés 64 kbyte-ra 
Programok árusítása és menedzselése 
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EGYESÜLET 


Cf 

EGYESÜLETI TAGOK 
FÓRUMA 


AMIGA memóriabővítő 
10 000 forintért, sound digi- 
tizer 7 500 forintért, 
C64/AM1GA lemezek 

100/150 forintért eladók. 
Németi Ferenc, 1182 Buda¬ 
pest, Nagyenyed u. 8/A. 

C64 programcsere. Cse¬ 
realapom 150 program. Fejes 
Zoltán, 5411 Kétpó, Árpád u. 
17. 

C64 programok már 3 fo¬ 
rinttól kazettára és lemezre 
eladók. (Mintegy 1000 da¬ 
rab). Válaszborítékért listát 
küldök. Kovács Krisztián, 
6750 Szeged-Algyő, Bartók 
Béla u. 6. 

ELADÓ! Commodore 
VC20 + 16 K-os bővítő + joy 
+ magnó + 250 darab prog¬ 
ram (irányár: 15 000 forint), 
vagy PLÚS/4-re cserélhető. 
Seres Zoltán, 6723 Szeged, 
Építő út 5/A. 

Keresem azt a programo¬ 
zót, aki C64-es gépre meg 
tudja írni annak a nyomtató¬ 
nak a programját, amely a 
porti és port2 kimenetelre 
van kötve. Takács Péter, 
Csehszlovákia, 94603 Visi- 
nokého 30. 

Rését gombos C64C + 
Cl54IC drive + SEIKHOSA 
SP 180 ve printer + felhasz¬ 
nálói könyvek eladók 53 000 
forintért. Lénárt Balázs, 
1133 Budapest, Kárpát u. 31. 
Telefon: 140-65-66. 

Programokat adok C64- 
re — 10 forint/darab. Leme¬ 
zes játékok kazettás változa¬ 
tai. Listát küldök. Bóta Csa¬ 
ba, 6000 Kecskemét, 
Reviczky u. 6. Telefon: (76)- 
47-088. 

Lemezen keresem a C64- 
es ÍRÓN LORD és a HGHT- 
ER BOMBER válto^tait. 
Cserébe színvonalas progra¬ 
mokat adok. Sípos Imre, 
7200 Dombóvár, Kölcsey u. 
17/A. 


Válogatott C-64 progra¬ 
mok nagy választékból olcsón 
eladók. 88/89-es programok¬ 
kal csere is lehetséges. Vá¬ 
laszborítékért listát küldök. 
Herczeg Sándor, 6101 Kis¬ 
kunfélegyháza, Pf.: 105. 

C-64-re keresem a Nyuszi 
olvasni tanít, a Wallie goes to 
rhymcland, a +4 sim. Csak bu¬ 
dapestiek írjanak! Kopasz ZcA- 
tán, Budapest XXI. Nap út 10. 

C-64 PC + 1541 Hoppy + 
magnó + joy + geos + CITI¬ 
ZEN 1200 + irodalom eladó. 
Ajánlatok levélben. Nagy 
Lá.szló, 9400 Sopron, Vörös¬ 
hadsereg u. 19. 

Eladó C-64 + 1541 drive 
és 50 lemez felhasználói és 
játékprogramokkal, valamint 
2 db JOY+FAST LOAD. Me¬ 
rényi Gábor, 1063 Budapest, 
Szív u. 39/b. fsz. 1. Tel.: 131- 
8590. 

C64 programcsere kazet¬ 
tán. Sóstai Zoltán, 8861 Szé¬ 
péinek, Béke út 46. 

Használt, jó állapotban 
lévő, olcsó nyomtatót vennék 
C64-hez. Jelentkezés levél¬ 
ben, árajánlattal! Szabó 
Krisztián, 2760 Nagykáta, 
Petőfi út 11. 

EXOS VS lemeze^séget 
támogató bővítés beépítése 
C64-be. Tizennégyszeres 
LOAD, több mint húsz új pa¬ 
rancs. Báli 2^1tán, 7300 Tol¬ 
na, Dohány u. 17. Telefon: 
(74)-40-500. 

C64-re keresem kazettá¬ 
ra: LAST NINJA 2, GAR- 
FIELD, BATMAN-THE 
MOVIE. Kálmán Tamás, 
1023 Budapest, Frankéi Leó 
u. 68/A. 

C64-es játékprogramok 
kazettán olcsón eladók (150 
Ft/db). Válaszborítékra listát 
küldök. Balogh Ferenc, 3931 
Mezőzombor, Bajcsy Zs. u. 8. 


C16 és PLUS/4 tulajdo¬ 
nosok! Szuperprogramokat 
adok olcsón va^ cserélek ka¬ 
zettán. Bende rerenc, 8500 
Pápa, Attila u. 5/B. 

PLUS/4 programokat cse¬ 
rélek lemezen és kazettán. 
Szöllősi László, 4033 Debre¬ 
cen, Hodászi L. u. 7/A. 

C64 + floppy + magnó és 
egyéb tartozékok olcsón el¬ 
adók! Gép külön is! Sági 
Emil, 8873 Szemenyecsör- 
nye, Dózsa György u. 66. 

ACTION REPLAY 3.0 
cartridge eladó 1600 forin¬ 
tért. C64 programok olcsón 
eladók. Válaszboríték esetén 
listát küldök. Levélcímem: 
Sulyok Tibor, 1066 Budapest, 
Dcssewffy u. 25—27. 

C64-hez egér + fényceni- 
za roppant olcsón progra¬ 
mokkal, DATA BECKER so¬ 
rozat féláron. Ugyanitt AMI¬ 
GA programcsere. Küldj 
listát! FANTOMAS SOFT¬ 
WARE, 1052 Budapest, Kí¬ 
gyó u. 4—6. 

C1551-es lemezegységet 
cserélnék ve 1541-esre vagy 
1541-n-re. Tímár Péter, 
5555 Hunya, Alkotmány u. 2. 

PLUS/4 programokat 
(többek közt ELITÉ, MÉR¬ 
CÉN ARI 1—2, SECOND 
CITY) eladók (10 Ft/db), 
vagy PASCAL fordítóra és 
hozzátartozó leírásra cseré¬ 
lek. Szíráki Péter, 1156 Bu¬ 
dapest, Sárfű u. 7. V/17. Tel.: 
(17—20 óra): 164—53—30. 

256 kbyte EPROM- 
BANK 2500, 16 kbyte cart¬ 
ridge tape, floppy és felhasz¬ 
nálói programmal 1400 fo¬ 
rintért eladó. Muzsik József, 
1173 Budapest, Kaszáló u. 
101. Telefon: 158-78-35. 

Keresek C64-re több ol¬ 
dalas lemezről átírt játékokat 
(főleg szimulátorokat) kazet¬ 
tára. Ifj. Csörgő László, 3441 
Mezőkeresztes, Ságvári u. 6. 

C64/II, 1541/11 floppy, 
1530 magnó, 2 joystick, 10 
lemez játékprogramokkal el¬ 
adó. Kiss Tamás, 1137 Buda¬ 
pest, Szent István park 10. 
Telefon: 129-59-55. 


C64-hez működőképes 
nyomtatót vennék. Prc»ra- 
mokat cserélek kazettán. Lis¬ 
tát kérek és küldök. Lőcsei 
Ferenc, 2244 Úri, Szent Ist¬ 
ván út 37. 

Igényesnek eladó! Megkí¬ 
mélt állapotban levő C64/II, 
1541AI, datasette, joystick, 
40 lemez minőségi progra¬ 
mokkal és szakkönyvek. La¬ 
jos János, 6100 Kiskun¬ 
félegyháza, Kossuth u. 28. 
Telefon: (76)-62-406. 

Fél évig használt 1551 
drive eladó vagy elcserélném 
1541/II-re. Fülöp Viktor, 
9400 Sopron, Hegyhát út 3. 

HELLO, C64-esek! Újra 
itt a TSG! 1000 programból 
eladunk, 88/89-eseket cseré¬ 
lünk. Csere esetén listát ké¬ 
rünk és listát küldünk. Csak 
kazettán! Bye, bye! TSG, 
2800 Tatabánya 3. Pf. 3023. 

Eladó C64, magnó, bot¬ 
kormány, játékprogramok. 
Ár: megegyezés alapján. 
Osztrics László, 2132 Göd- 
felső, Rákóczi u. 93. 

A COMPUTEAM GMK 
ajánlata: fényceruza C64-hez 
és PLUS/4-hez, postai után¬ 
véttel 1250 forint. Rendelési 
cím: COMPUTEAM GMK. 
7400 Kaposvár, Berzsenyi u. 
32. 

C64-re, PLUS/4-re játék- 
programokat adok kazettán 
(10 Ft/db). Rudolf Csaba. 
2800 Tatabánya, Erdész u. 
32. 2/6. 

AMIGÁHOZ DIGI-VI- 
EW digitalizáló és HITACHI 
színes kamera eladó. Tamás 
Béla, 9700 Szombathely, 
Wesselényi u. 8. Telefon: 
(94)-14-837. 

PLUS/4 programokat cse¬ 
rélek és eladok (10 Ft/db). 
Főleg C64 átiratok érdekel¬ 
nek. Hartung Gábor, 6045 
Ladánybene, Gödörállás dű¬ 
lő 55. 

Színvonalas, főleg 1989- 
es programok, C64-hez ka¬ 
zettán eladók. Csere is érde¬ 
kel. Főleg szimulátorok érde¬ 
kelnek. ^rmán Attila, 5100 
Jászberény, Nádor u. 2. 
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Eladó C-64 + 1541 drive 
és 50 lemez felhasználói és 
játékprogramokkal, valamint 
2 db JOY+FAST LOAD. Me¬ 
rényi Gábor, 1063 Budapest, 
Szív u. 39/b. fsz. 1. Tel.: 131- 
8590. 

C-64 PC + 1541 Floppy + 
magnó + joy + geos + CITI¬ 
ZEN 1200 + irodalom eladó. 
Ajánlatok levélben. Nagy 
László, 9400 Sopron, Vörös¬ 
hadsereg u. 19. 

C-64-re keresem a Nyuszi 
olvasni tanít, a Wallie goes to 
rhymeland, a +4 sim. Cműc bu¬ 
dapestiek írjanak! Kopasz Zol¬ 
tán, Budapest XXI. Nap út 10. 

C-64-re 89—90-es prog¬ 
ramok eladók. Keresem a 64 
kByte cartridge leírását és a 
demo desinger ül. bye! Bakó 
Tamás, Budapest, XVTU. 
Damjanich u. 22. 

C-64-re eladó beérkező 
számla feldolgozó pénzűéi 
program (ÁFA + likvidácio)! 
Kérjen részletes információt. 
Miklós Ferenc, 8900 2^1a- 
egerszeg, Kossuth u. 19—23. 
IV. 76. 

C-64-re színvonalas prog¬ 
ramokat cserélek és eladok 
lemezen. Listát kérek és kül¬ 
dök. Baki Ádám, 1091 Buda¬ 
pest, Üllői út 179. Tel.: 
1771-951. 

C-64-re keresek profi ál¬ 
lóeszköz-nyilvántartó prog¬ 
ramot. Tel.: este 6 óra után 
181-0429. Lázár Judit,^l 115 
Budapest, Szakasits Á. u. 
64/b. 

Újszerű C-64 + magnó + 
joy + monitor + cartridge el¬ 
adó. Horváth László, 2852 
Kecskéd, Majki út 13. 

Eladó C-64 + 1541 disk 
drive + 1530 datasette + Ml- 
maus + 15 db ka;Ktta + 160 
db lemez. SÜRGŐS! Áraján¬ 
latokat levélben várok. Va- 
sics Tamás, 8855 Belezna, 
Kossuth u. 40. 

SZEX-, zene- és játék- 
programok eladók és cserél¬ 
hetők kazettán. Csere esetén 
listát kérek és küldök. Mol¬ 
nár Ferenc, 6000 Kecskemét, 
Mczőfi István u. 10. ép. 1/5. 


gyűjteményből választhat¬ 
tok. Válaszborítékért listát 
küldök. Megfelelő cserealap 
esetén csere is lehet, ez eset¬ 
ben listát kérek. 64’ER és Po¬ 
wer Play magazinért sok 
programot adok. Action Rep- 
lay MRV-ös cartridge-t ven¬ 
nék. Németh András, 9081 
Győrújbarát, Veres P. u. 23. 

Válogatott C-64 progra¬ 
mok na^ választékból olcsón 
eladók. 88/89-es programok¬ 
kal csere is lehetséges. Vá¬ 
laszborítékért listát küldök. 
Herczeg Sándor, 6101 Kis¬ 
kunfélegyháza, FT.: 105. 

C-64-hez cartridge-ok, 
freezerek és lassítók készíté¬ 
sét vállalom. Válaszboríték 
ellenében tájékoztatót kül¬ 
dök. Gyárfás Richárd, 1193 
Budapest, Munkácsy M. u. 5. 

C-64-re keresem a simons 
basic programot cserébe, 
vagy megvctelre. Fejes Zól- 
tán, 5411 Kétpó, Árpád u. 17. 

C-64 felhasználói progra¬ 
mok valamint Geos program- 
csomag lemezen eladó. Csak 
válaszborítékra válaszolok. 
Kívánságra leírást adok. Ke¬ 
resek oktatói programokat 
játékért. Varsányi Gábor, 
9700 Szombathely, Nagy L. 
u. 11. 

C-64+ 1541 + magnó+ 80 
lemez + epromégető + köny¬ 
vek (40000 Ft-ért) eladók. 
Eladó továbbá hibás C+4 
magnóval 5000 Ft-ért, ZX 
81-es + 16 K bővítővel 5(XK) 
Ft-ért. Vári Sándor, Szolnok, 
Rigó J. u. 1.6/33. Teh: 06-56- 
43 737. 

Használt nyomtatót vens 
nék C-64-hez olcsrái! Áraján¬ 
latot kérek! Szabó Krisztián, 
2760 Nagykáta, Petőfi út 11. 

C-64-re havonta 15—20 
db kazettás és 3 disc-nyi le¬ 
mezes próbám eladó. Vá¬ 
laszborítékért 700 program¬ 
ról listát küldök. Szabó Tibor, 
Nagymágocs, Felszabadulás 
tér 1. 

Vennék C-64-es gépet, 
minél régebbi típust, C-16 
formájút 7000—8000 Ft-ért. 
Völgyi János, 1036budapcst, 
Lajos u. 107. Tel.: 168-3649 


Ábrázoló geometria (át¬ 
hatások) program (C+4) el¬ 
adó! Ára csak 320 Ft leme¬ 
zen! Kérjen részletes tájé¬ 
koztatót!!! PCS and SPH 2060 
Bicske, Somogyi B. u. 20/a. 

C-16, C-116 vagy +4-re 
cserélném 3 oktávos, dobgé¬ 
pes Audioton orgonámat! Jó 
állapotú ve 20 is érdekelne. 
Bódis AttUa, 8000 Székesfe¬ 
hérvár, Hernádi u. 6. III/4. 

Eladó C+4, Junoszt TV, 
Floppy, magnó, lemezek, ka¬ 
zetták 2000 db programmal 
és szakirodalom. Árajánlato¬ 
kat a következő címre kérek: 
Miszlai Imre, 5900 Oroshá¬ 
za, Könd u. 80/B. II/3. 

Megvenném vagy elolvas¬ 
nám a +4-ben lévő adatbázis¬ 
kezelő software kezelésének 
magyar fordítását. Nagy- 
György Tibor, 3700 Kazinc- 
baírcika. Liliom út 2. 

Plus/4-re keresem a dril- 
ler, footballer of the year, ga- 
mes creator című programo¬ 
kat (vétel vagy csere). Labádi 
Zoltán, 6622 Nagymágocs, 
Ságvári E. u. 1. 

Plus/4,1551 -es floppy, 20 
lemez játékokkal, joystickkai 
eladó! Tóth László, Kecske¬ 
mét, Énekes u. 28. 

Színvonalas C-16, +4 és 
C-64 programok eladók ka¬ 
zettán és lemezen, megegye¬ 
zés szerint. Megfelelő progra¬ 
mok esetén csere is elképzel¬ 
hető. +4-re egész 
programgyűjtemény (kb. 
15(X) program) eladó! Válasz- 
borítékot kérek! Váli Tibor, 
1117 Budapest, Karinthy F. 
u. 5. Tel.: 186-4335 

ZX-Speetrum H8K eladó. 
Ár: 8500 Ft, Joy: 1000 Ft. 
Sürgős!!! Herczeg Attila, 
6000 Kecskemét Homok u. 2. 

Használt, de jó állapot¬ 
ban lévő ve 1541-es vagy 
1541/n floppy drive-ot ven¬ 
nék. Szedlák Tibor. Telefon: 
187-03-07. 

C64 programokat cseré¬ 
lek kazettán. Listát kérek és 
küldök. Regensburger Ár¬ 
pád, 2400 Dunaújváros, Vas¬ 
mű u. 59. VII/4. 


AMIGA 500-as számító¬ 
géphez félmegabyte-os me¬ 
móriabővítő, vadonatúj, ol¬ 
csón — 12()00 Ft-ért — el¬ 
adó. Kiss Henrik, 1213 
Budapest, Határ u. 103. 

VC-20-ra 16K bővítős 
programokat adok, veszek, 
cserélek kazettán. Eladó egy 
pár CB rádió! Irányár 1800 
Ft. Sere Zoltán, 6723 Szeged, 
Építő út 5/a. 519. épület, 2. 
em. 16. 

Figyelem! 1541/n-es 
floppyra gyors és megbízható 
lemezoldalmásoló programot 
keresek azonnal. Deák Fe¬ 
renc, 1142 Budapest, Kassai 
tér 19. XII/4. Tel.: 251-1607. 

Nálam megrendelheted a 
háromoldalas test drive-2-t! 
Masterdisk sceneiydisk + 12 
autó. Ár: oldalanként 20 Ft + 
postaköltség (25 Ft). Selmeci 
Marcell, 5(K)0 Szolnok, Me¬ 
der u. 24. 

Fényceruza C-64-hez, C- 
128-hoz postai utánvéttel 
1250 Ft-ért kapható. COM- 
PUTEAM, 7400 Kaposvár, 
Berzsenyi u. 32. 

Kapható a D and T kár¬ 
tyacsalád tagjai magnó és 
fíoppy-file kezelésére. Közü- 
leteketnek is utánvéttel. Ja¬ 
kab Péter, 1046 Budapest, 
Török I. út. 25. Tel.: 169- 
1466/161 

Garanciális C-128 + C- 
1571 drive + 100 db disk + 
programok + szakirodalom + 
1 db joystick eladó. Neszmé- 
lyi Zsolt, 1156 Budapest, 
Páskomligeti út 51. IX/37. 
Tel: 164-5003. 

Eladó: C-128 + 1570 
floppy drive + datasette +100 
db lemez C-64 és C-128 prog¬ 
ramokkal + fastload + hang¬ 
digitalizáló + irodalom. Lázár 
Zoltán, 2013 Pomáz, Petőfi 
u. 16. 

Üdvözlet minden C-64 
tulajdonosnak! Akartok ol¬ 
csón (18 Ft körül) szuper 
programokat kazettára és le¬ 
mezre? Több mint 2000 ka¬ 
zettás játék, 1000 felhaszná¬ 
lói és 150 lemeznyi lemezes 
játék közül válaszhattok. Az 
egyik legnagyobb program- 
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Elromlott C64-es tápegy¬ 
sége? Ne dobja el! Féláron 
megjavítom! Csak 1250 fo¬ 
rint + postai utánvét. Küldje 
el és én a megjavított tápegy¬ 
séget 10 napon belül vissza¬ 
küldöm. 1 év garancia. Az or¬ 
szágban csak nálam! Izbégi 
Tibor, 5452 Mesterszállás, 
Ady Endre u. 9. 

Videoton TV-eomputert 
magnóval elcserélném 1541- 
n. drive-ra, esetleg OC-118- 
asra is. Molditz György, 
2800 Tatabánya, GaJ Itp. 
908. 3/10. 

C64, 1541-es drive (spe- 
eddos), 170 darab diszk, da- 
tascttc, 35 darab kazetta, 2 
joystick, sürgősen eladó. 
Jancskity László, 2800 Tata¬ 
bánya, I^tona J. út 5/1. 

C64 programok (leme¬ 
zen) és leírások cseréje. Gyu- 
lay György, 1142 Budapest, 
Királyhidai u. 20. 


Hi, C64 players! Ha nincs 
meg álmaid játéka, segítünk 
megszerezni. Kazettán pél¬ 
dául: Figther Bomber, Test 
Drive 3, Amica Paint, Defen- 
der, 4 fordulatos turbó, 
O.T.C., UGH-OLYMPICS, 
HOSTAGES, Lemezen; Fer¬ 
rari F-1, IKON LORD, SÍM 
CITY, OIL IMPERUM, 
CURSE , OF AZÚRÉ 
BONDS. Árajánlattal ellá¬ 
tott listát küldünk. Rését 
gomb: 150 forint. Halmai Bo¬ 
lond, 9400 Sopron, Széché¬ 
nyi tér 15. 

Eladó új C64 + magnó + 
154 l/II + 180 lemez és 32 ka¬ 
zetta (kb. 1800 program) + 2 
joystick. Irányár: 55 000 fo¬ 
rint. Esetleg külön is. Bakai 
Attila, 5420 Túrkeve, Szé¬ 
chenyi u. 4/6. 

C64-re játék- és felhasz¬ 
nálói programokat cserélek. 
Szabó Zsolt, 2040 Budaörs, 
Patkó u. 3. VI/51. 


C-128D+ 128k RAM bő¬ 
vítő + 50 lemez: 40000 Ft. 
ATARI 800 XL + Roppy + 
45 lemez: 24000 Ft. ST, AMI¬ 
GA csere érdekel. Radics Bé¬ 
la, Deszk, Felszabadulás u. 
30. T; 06-62-71 235 

Programok eladása 10 Ft- 
os egységáron. Listát küldök! 
Intellectual frontline softwa¬ 
re!!! Fekecs Gyula, 7625 
Pécs, Vak B. u. 52. Tel: 06- 
72- 32 986 

Keresek nyák és kapcso¬ 
lási rajzot 220 V-os futó¬ 
fényhez, lehetőleg na^ telje¬ 
sítménnyel. Schultz György, 
5650 Mezőberény, Árpád u. 
47/a. 

Eladó egy Commodore 
ve 20! Programokkal, 16 K- 
os bővítővel, joy-jal, megnó- 
val. Ugyanitt programcsere 
kazettán. Több mint 200 
program. Seres Zoltán, Sze¬ 
ged, Építő út 5/a. 


Új C64-es adatmagnó, 
VC20-as játék- és felhaszná¬ 
lói programok (812) block le¬ 
mezzel eladók. Stierbach Mi¬ 
hály, 1224 Budapest, VII. u. 
4. 

Eladó C128D + beépített 
drive + 50 lemez: 39 8()0 Ft. 
Atari 800XL + drive + 40 le- 
mezÉ 24 000 Ft. Amiga, At¬ 
ari stb. csere érdekel. Radics 
Béla 6772 Deszk, Felszaba¬ 
dulás u. 30. Tel: (62) 71- 
235. 

Eladó C-128D + 40 lemez 
+ 128 K RAM modul: 40 000 
Ft. ATARI 800XL + Hoppy + 
40 lemez: 24 000 Ft. Radics 
Béla, 6772 Deszk, Felszaba¬ 
dulás u. 30. Tel: 06-62- 
71-235 

Keresek C-128-hoz Tur¬ 
bó Pascal fordítót, C-64-hez 
LOGO értelmezőt. Rácz Zol¬ 
tán, 2112 Veresegyház, Cso¬ 
konai u. 39. 


sím city C64 —AMIGA 

lemez: 599Ft 

A Sím City segítségével a világ nagy városainak 
urává válhatsz. Házakat, utcákat, gyárakat, re¬ 
pülőtereket, stadionokat építhetsz. Küzdened 
kell a bűnözés és a légszennyeződés ellen, 
adót kell szedned, és egyerTsúlyban kell tarta¬ 
nod a költségvetést Is. Minden vállalkozás és 
mozgás jelen Időben játszódik, döntéseid azorv 
nai hatnak az adott város életére. Válsághelyze¬ 
tek. természeti katasztrófák (tornádó, földren¬ 
gés stb.) fenyegetnek, de ha ügyes vagy, végül 
felépítheted álmaid városát. 

A Sim City Izgalmasan összetett, egyedülálló 
játék. Nyolc, előre megtervezett helyszínt tar¬ 
talmaz, pl. San Francisco, Toklo, Rio de Janei¬ 
ro..., de nyugodtan megtervezheted képzelet¬ 
beli városodat Is. 

MÁR NÁLUNK IS KAPHATÓ 
A VILÁGSIKERT ARATOTT 

SZOFTVER 

SZÁMÍTÁSTECHNIKAI ÁRUHÁZ 
1136 Budapest, Balzac u. 35. 
Telefon: 140-2954 

MINI 2C 

3530 MISKOLC, Vörösmarty u.51. 
Telefon: 46/ 86-538 
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Pályázat! Pályázat! Pályázati Pályázat! Pályázat! Pályázat! 


várunK.a'^^ .„. . 990 . november® • 

, .^oVOSOFTs^bötó 
I 


Másod'^'/j; 20 000,'--'^ 
^arm^diK J 


V pa»y «*■" ooo Vy 

Pályázat! Pályázati Pályázat! Pályázat! Pályázat! Pályázat! 

lassnesssh 


IQ-7000 
elektronikus zsebnotesz 

— határidőnapló; 

— telefonregiszter; 

— zsebszámológép (printer üzemmódban is); 

— szövegbeírás javítási lehetősével; 

— pontos idő a világ minden tájból; 

— naptár 1901-tői 2099-ig; 

— figyelmeztető jelzést ad időpontra, hivatalos 
és magánprogramokra; 

— illesztési lehetőség nyomható és IMB PC részére; 

— méret mm-ben (zárt állapotban) 163 x 94 x 21,5 
és mindez csak 13 200 Ft+AFA 

MAGYAR NYELVŰ HASZNÁLATI UTASÍTÁS. 
Külön vásárolható hozzá: 

SHARP IQ-701A manager kártya 
SHARP CE-50P grafikus nyomtató 
SHARP IQ-79 1 A PC Interface 

továbbá különböző memória- és fordítókártyák 


- KERESKEDELMI KFT. - 

Ügynöki és viszonteladói hálózatunk bővítése érdekében 

— egyetemisták, nyugdíjasok; 

— anyagbeszerzők, beruházásvezetők; 

— bolttal rendelkező szervezeti egységek 

jelentkezését várjuk. 

Jelenkezés: Dr. Góber Lajosnál 111 -20-83 

“ SBBOaSSS 

KÍRrCKLli._L!.':i KFI 

Budapest V., Kálmán Imre u. 27. 

Telefon: 111-20-83,132-25-44,132-43-92 
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sorszám 

típus 

megjeleaás 

« program neve 

ára 

151 

Cl 28 

89/4 

Pót-funkciók 

20.- 1 






152 

PLUS/4 

89/5 

BetUradar 

40.- . 1 






153 

C64 

89/5 

BHP vírus kereső 

40.- 

070 

C64 

87/8-9 

Couno-do-re /BASIC változat/ 

60.- 

154 

C64 

89/5 

Képfnutató 

60,- 

071 

C64 

67/8-9 

Coowno-do-re /lefordított/ 

60.- 

155 

Cl 28 

89/S 

VOC mint RAM floppy 

30.- 

072 

PLUS/4 

87/8-9 

KuAkolö - Bővített moaltor 

30.- 

156 

Cl 28 

89/5 

Joy SPRITE 

30.- 

073 

PLUS/4 

87/8-9 

Bkezetes betűk 

30.- 

157 

C64 

89/5 

Javított líst 

30,- 

074 

PLUS/4 

87/8-9 

PLÚTÓ - Rajzold program 

60.- 

158 

C64 

89/5 

Zaneí segádlet 

60.- 

075 

VC20 

87/8-9 

Na jomfogö 

40.- 

159 

C16 

09/6 

Színbeál1itó 

30.- 

076 

C64 

87/8-9 

Tóbbtényazós döntések 

40.- 

160 

C16 

89/6 

PLUS/1 listázó 

40.- 

077 

C64 

87/6-9 

Raszter 

30.- 

161 

PLUS/4 

89/6 

Fást valídate 

60.- 

070 

C16 

07/10 

Append 

40.- 

162 

C64 

89/6 

Balnyilcopy 

40.- 

079 

C64 

87/10 

Nagyító 

40.- 

163 

C64 

89/6 

3-D labirintus 

60.- 1 

060 

C64-H+ 

87/10 

Makrók 

40.- 

164 

C64 

89/6 

Mini vírus 

40.- 

081 

0126 

67/11 

Striiktúra 

30.- 

165 

ci2e 

89/6 

VDC-windoM 

30.- 

082 

0128 

87/11 

Ekalákezteto 

30.- 

166 

C64 

09/6 

Cimkeiró 

30.- 1 

083 

064 

87/11 

Monítorka 

40.- 

167 

C64 

89/6 

Piros-fehér-zöld képernyő 

20.- 

064 

016 

07/11 

Címról-címro 

30,- 

166 

C64 

09/7-0 

GEM-GET-INPtn* 

40.- 

085 

064 

87/12 

Gyors sorol 1 

40.- 

169 

PLUS/4 

89/7-8 

Szinbeéllitás 

30.- 

086 

064 

87/12 

1541 

40.- 

170 

PLUS/4 

89/7-0 

Nagyító (079 átirata) 

50.- 

087 

064 

87/11-12 

1541 4- Monítorka 

60.- 

171 

PLU3/4 

09/7-8 

60 karakteres szövegszerkesztő 

80.- 1 

088 

016 

87/12 

Lokális változók 

40.- 

172 

C16 

89/7-8 

Bkezetes betűkészlet 

60.- 

089 

016 

67/12 

Tekergő 

40,- 

173 

C16 

89/7-8 

Kisebb ékezetes nagybetűk 

40.- 

090 

064 

66/1 

Fekete — fehér 

20.- 

174 

C64 

89/7-8 

Gyors directory 

40.- 

091 

016 

88/1 

Datáaitó 

30.- 

175 

C64 

89/7-6 

AUTOSTART 

40.- 

092 

064 

88/1 

Programkönyvtár 

40.- 

176-177 

C64 

89/7-0 

MULTI 16 * DEMO 

40.- 

093 

016 

08/1 

Kateaztrófe 

30.- 

178 

C64 

09/7-8 

EGBR 64 

40.- 

094 

VC20 

88/2-3 

TG BASIC 

60.- 

179 

C16 

89/7-8 

Flesh-Loed 

40?- 

095 

064 

80/2-3 

Topy Typer 

40.- 

160 

C16 

89/7-8 

BAS1C-LISTA-3CR0LL 

40.- 

096 

064 

80/2-3 

Sprite editor super 

60.- 

161-162 

PLUS/4 

89/7-0 

2x2-es karakterek 

20.- 

097 

016 

88/2-3 

Katasztröfegép 

30.- 

183 

C16 

89'/7-8 

Kereső 

20.- 

098 

064 

88/4 

Modul gráf lka 

60.- 

184 

C16 

69/7-8 

Boríték címező 

50.- 

099 

064 

88/4 

Segítség! 

30,- 

185 

C64 

89/7-6 

DEC - HEX - BIN 

60,- 

100 

064 

86/5 

Gurítsd a golyót! 

60. 

106 

C64 

89/7-8 

Object savé 

30.- 

101 

PLUS/4 

88/5 

Egyonesrajzoló 

30.- 

187 

C64 

69/9 

Sprlte 

40.- 

102 

PLUS/4 

88/6 

Szótár 

60.- 

188 

064 

89/9 

Bioritmus 

30.- 

103 

016 

88/7-8 

Gitárískola 

60.- 

189 

016 

89/9 

TURBO TRANS 

70.- 

104 

064 

86/7-6 

Gyors BASIC 

30.- 

190 

064 

89/10 

Névjegy 

30.- 

105 

0128 

80/7-8 

Super hardcopy 

40.- 

191 

064 

89/10 

Kórokozó 

40.- 

106 

0128 

60/7-8 

Grefikus nyomtatás 

40.- 

192 

064 

89/10 

SCAN 

40.- 

107 

064 

88/9 

Fást validate 

60,- 

193 

PLUS/4 

69/10 

DISC CRACK 

60.- 

109 

064 

68/9 

Data bevivó 

30.- 

194 

C64 

89/11 

Függvényábrázolás 

80.- 

110 

064 

88/9 

DF.F FN/X/ 

30.- 

195 

064-016 

89/11 

UJ Optinput 

40.- 

111 

PLUSZ4 

86/10 

Magyarosító 

50.- 

196 

PLUS/4 

89/11 

Számkirakó 

60.- 

112 

064 

66/10 

Diszkkezolö 

40.- 

197 

064 

09/11 

Céllövölde 

30.- 

113 

016 

66/10 

0ISASSE3fBLER 

30.- 

198 

C64 

89/12 

ESPERANTO 

50.- 

114 

064 

66/11 

Négy képernyő 

20.- 

199 

PLUS/4 

89/12 

Lépegető 

40.- 

115 

064 

66/11 

Ablakok 

20.- 

200 

PLUSZ4 

90/1 

RaszterbUvölet 

30.- 

116 

064 

66/11 

ASCII képernyő 

20.- 

201 

PLUS/4 

90/1 

TOOL - 7.0 

50.- 

117 

064 

88/11 

Pl l lanatíeIvétel 

20.- 

202 

C64 

90/1 

Óra a kereten 

40.- 

116 

064 

86/11 

Blinky 

20.- 

203 

C64 

90/1 

Mutatópálca 

30.- 

119 

064 

66/11 

Színes villogtató 

20.- 

204 

064 

90/1 

Karaktertervező 

40.- 

120 

064 

88/11 

60 karakteres üzem 

20.- 

205 

064 

90/2 

Csillagászat 

60.- 

121 

064 

80/11 

Ví1logtatO 

20.- 

206 

064 

90/2 

Térképismeret 

30.- 

122 

064 

80/11 

Joyat í ck 1ekárdező 

20.- 

207 

064 

90/2 

Smooth scroll 

30.- 

123 

064 

68/11 

Gyors sprile mozgatás 

20.- 

208 

064 

90/2 

Fiié teater 

30.- 

124 

064 

88/11 

DEF FN - másképpen 

20,- 

209 

C64 

90/2 

Line Tracer 

30.- 

125 

064 

68/12 

Szuper input 

40.- 

210 

064 

90/2 

Superviaor 

30.- 

126 

064 

88/12 

Ugráló színsávok 

30.- 

211 

PLUS/4 

90/2 

Véletlenszerű képesére 

40.- 

127 

064 

09/1 

PRINT AT 

20.- 

212 

PLUS/4 

90/3 

Kerakiertervezö 

50.-r 

128 

016 

89/1 

FunkciObi)lentyük 

20,- 

213 

064 

90/4 

Zsolnel átlegszámitó 

30.- 

129 

064 

88/12 

M 1 n 1 he 1p 

20.- 

214 

064 

90/4 

Labdák 

30.- 

130 

064 

89/2 

Házi pók 

40.- 

215 

064 

90/4 

Funkcióbi1lentyUk 

40.- 

131 

064 

69/2 

Csillegos ég 

30.- 

216 

064 

90/4 

Futó felirat 

40.- 

132 

064 

89/1 

Szalagról lemezre 

40.- 

217 

064 

90/4 

Jegyzettömb 

20.- 

133 

064 

69/1 

Km f fel 

50.- 

218 

064 

90/5 

Videofeliretozö 

30.- 

1 134 

PLUS/4 

89/1 

Zofflbi 

60.- 

219 

064 

90/5 

OUMP 

30.- 

135 

064 

89/1 

Kétoldalas listázó 

60.- 

220 

PLUS/4 

90/5 

Bűvös négyzet 

40.- 

1 136 

PLUS/4 

89/1 

Objektív osztályozás 

50.- 

221 

064 

90/5 

Szuper BONGO 

30.- 

137 

PLUS/4 

89/2 

Tömörítő 

20.- 

222 

064 

90/6 

VldeoketelöguB 

50.- 

136 

PLUS/4 

69/2 

Kifejtő 

20.- 

223 

064 

90/5 

Datakészitó 

40.- 

139 

PLUS/4 

89/3 

3 - plusz - 1 magyarul 

40.- 

224 

Cl 28 

90/6 

Cartridge szimulátor 

60.- 

140 

PLUS/4 

89/3 

Napló-kezelő 

30.- 

225 

C126 

90/6 

Double charset 

30.- 

141 

PLUS/4 

69/3 

Analóg őrá 

20.- 

226 

PLUS/4 

90/7-0 

Hatos lotto 

30.- 

142 

0128 

09/3 

Javított renumber 

40.- 

227 

PLUS/4 

90/7-6 

BITt-MAP 

30.- 

143 

AMIGA 

89/4 

Magyar karakterek 


226 

C64 

90/7-8 

GEOS BOOT MAKER 

30.- 

144 

064 

69/4 

Keret csíkozás 

20.- 

229 

C64 

90/7-6 

Sereen editor 

40.- 

1 145 

064 

69/4 

Mozgó felírat 

20.- 

230 

C64 

90/7-6 

Szekvenciális fiié listázó 

30.- 

146 

064 

69/4 

26. sor 

40.- 

231 

C64 

90/7-6 

Editorbbvltó 

60.- 

147 

016 

09/4 

Optinput 

30.- 

232 

C64 

90/7-8 

Kockapöker 

60.- 

148 

C16 

69/4 

TUrbo-block 

30.- 

233 

C64 

90/7-6 

Lemezbüvész 

40,- 

149 

016 

69/4 

Finom sorol 1 

30.- 

234 

C64 

90/7-8 

Szuper autostart 

30.- 

150 

PLÜS/4 

09/4 

Animáció 

60.- 

235 

C64 

90/7-6 

Sípoló billentyűk 

20.- 
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+4-re! 


Grafikus terület rögzítése: 
poke 117,255 

Ha ezt a POKE utasítást nem írjuk be, akkor a grafikus 
képernyő bekapcsolása után a $4000-től kezdődő memória¬ 
tartományok $7000-től kezdődően felfelé tolódnak. 

Új karakterek az osztott grafikus képernyő alsó szöveges 
részén: 

POKE 2042,0 

Új karakterek: karakteres üzemmód 
poke65298,56: poke65299,dec ('xx') 
xx-memóriacím, $4000-nél xx-40 
A karakteres képernyőn egyszerre csak egy karakterkész¬ 
let használható. Célszerű a karakterváltást funkciógombra is 
rátenni, mert hiba esetén a képernyő zavarossá válik. Ez ta¬ 
pasztalható a grafikus képernyő törlése és monitorból való 
visszatérés esetén is. 

Az előbbi egy GOSUB rutinnal kivédhető: 

GRAPHICO: POKE65298,65: POKE5299.xx 
retum 

keyl,"poke65298,56: poke65299,64' +chr$(13) 
key2,"poke65298,56: poke65299,68' +chr$(13) 
key3,'poke65298,56: poke65299,72' +chr$(13) 
key4,’poke65298,56: poke65299,76' +chr$(13) 
key5,'poke65298,196: poke65299,208' +chr$(13) 
funkciógombok karakterkészlet választása: 

FI $4000, F2 $4400, F3 $4800, F4 $4C00, F5 $D000 — 
eredeti rom karakterkészlet. 

Új karakterek grafikus képernyőn: Karakterkészlet beállí¬ 
tása: 

$2E4 tárcímen(dec:740) 
poke740,zz 

zz-64; zz=-68', zz=72; zz=76: zz»208 rom nagybetűs karak¬ 
terkészlet. 

zz-212 rom kisbetűs karakterkészlet. 

Grafikus képernyőn a karakterkészlet utasításonként vált¬ 
ható a $2E4 cím átírásával. 

Basic program átrakása új területre: 
poke dec('2B'’).dec('BB’) BB: alsó pl.: $40 01 
poke dec('2C'),dec("AA') AA: felső AA BB 
new: beállítja az új értékeket 
$AABB az új terület eleje. 

Rését után a program újraélesztése: 

Az eredeti tárcímen (parancs mód) 

poke dec(" 1001').! :renumber vagy poke4097,1 :renumber 

Az új tárcímen: 

1, poke dec(’2B').dec('BB') 
poke dec('2C'),dec('AA') 

2, POKE DEC('AABB')-1,0: NEW 

3, poke 117,255 

4, poke dec('AABB'),l:renumber 

Egy példa $5001-re, írt program indítására $ 1001-es cím¬ 
ről: 

1 POKE43,1:POKE44,80EOKE117,255 

2 POKE DEC("5000').0:RUN Lörentei János 


Kérem, hogy a Commodore Újság legközelebbi számában 
jelenjen meg a következő szövegű apróhirdetés: 

(minden kockába egy betűt írjon) 



Tagsági szám;. 

Feladandó az újság címére: 

Commodore Újság 
Budapest, 1388. Pf. 86. 

Alulírott megrendelem a következő programokat a PÖTYÖ- 
GŐSZOLGÁLAT-tól; 


PROGRAM SORSZÁMA 

Ara 

1. 


LU 

LU'- Ft 

2. 




LU'- Ft 

3. 



LU'-Ft 

4. 




LU'- Ft 

5. 



LU'- Ft 

6. 



LU'- Ft 

7. 




UJ'- f^t 

8. 




LU'- Ft 

9- 


1 

LU'- Ft 


összesen: | | | db | | | | - Ft 


A programokat a SZOLGÁLAT által biztosított 
lemezre (99 Ft/db) 
kazettára (40 Ft/db) 

az általam küldött adathordozóra kérem. 

(Kérjük a megfelelő szöveg aláhúzását!) 

POSTAköltség (25 Ft) 

A fizetés módja; személyesen — csekken — utánvéttel 

(Kérjük a megfelelő szöveg aláhúzását!) 

ÖSSZESEN: 

A megrendelő neve: . 

Címe:. 



29 október'" 



































































AC64 

JELKÉSZLETE 

HOL VANNAK 
A JELEK? 

Mint mindent, amit a számítógép 
mutatni, kijelezni vagy bármi módon 
megjeleníteni képes, azaz a jelkészJetet 
is valahol a tárolóban „őrzi”. De hol? 
Nos előbb megfordítjuk a kérdést úgy 
hogy nézzük, milyen jeleket ismer a gé¬ 
pünk egyáltalán? Erre az alábbi program 
szolgál: 

10 PRINT CHR$(147):FOR T4) TO 
255:POKE 1024+T,T:NEXT 

Most RUN után az első hat és fél 
képernyői sorban megjelenik a C64 pon¬ 
tosan 256 darabból álló (0—255) jel¬ 
készlete. Itt a normál és az inverzek is 
föllelhetők. 

Ezeket a jeleket nem lehet átdefini¬ 
álni. Hiszen mivel ezek a bekapcsolás 
után azonnal a rendelkezésre állnak, 
nem lehetnek máshol, mint a fölül nem 
írható ROM-bán. A kézikönyv felvilá- 
gosítá.ssal is szolgál: a jelkészJet helye az 
53248-as címen van a videó chip alatt. 
Mit tehetünk hát, ha mégis meg akarjuk 
változtatni a jeleket? Nos egyszerűen 
megmondjuk a VlC-nck, hogy a karak¬ 
tereket lesz szíves valahol máshol, 
mondjuk a 8192-es címtől keresni. Ez az 
alábbi paranccsal történik: 

POKE 53272,24 

Ha kiadjuk a fönti parancsot, a lát¬ 
ható képernyőn álló karakterekből hir¬ 
telen egy kupac „szemét” lesz. Ennek 
oka az, hogy csupán a mutatót állítottuk 
át, az adott helyen még nincs semmiféle 
jelkészJet. Ezért egyelőre kapcsoljunk 
vissza a régi jelkészletre: 

POKE 53272,21 

Ahhoz, hogy a nevezett címen hasz¬ 
nálható jelkészlet legyen, először a meg¬ 
lévőt vesszük elő úgy, hogy átmásoljuk. 
Ezt az alábbi program végzi el nekünk: 

30 POKE 56334,PEEK(56334) 
AND 254 

40 POKE 1,PEEK(1)AND251 

50 FÓR T=0 TO 2047:POKE 
8192+T,PEEK(53248+T):NEXT T 

60 POKE 1,PEEK(1) OR 4 

70 POKE 56334,PEEK(56334) OR 1 

Ami itt történik, kissé talán kompli¬ 
káltnak néz ki, mégis egyszerű hatású. 

I 30 


TIPPEK-TRÜKKÖK 


Először utasítjuk a C64-est a 30-as sor¬ 
ban, hogy a művelet befejezéséig meg¬ 
szakítást (interruptot) ne engedélyez¬ 
zen. A 40-cs sorban a C64-cs operációs 
rendszerét kikapcsoljuk a többszörös 
használatú területről, helyére pedig a 
jelkészJet ROM-ot tesszük. (Ha most 
megszakítás lépne föl, a számítógép a 
szükséges rutin helyett c.sak a jelkészJet 



1. ábra: A C64-es Jelek mátrixa. 

MlrxJen karakter egy 8x8-as táblázatban áll. 
ahol mIrxJen sornak egy-egy érték felel meg 

„salátát” lelné, ami miatt mindjárt le is 
merevedne.) Az 50. sorban kiolvassuk a 
ROM-ol és az információt a 8192-cs 
címtől a RAM-ba írjuk. Végezetül 
visszaállítjuk az eredeti állapotot és az 
interruptot ismét engedélyezzük. 

MÁSOLÁS BYTE- 
RÓL BYTE-RA 

Ha most 20-as sorként a föntebb már 
ismertetett „átirányító” utasítást is be¬ 
szúrjuk, a programindítás után klassz 
dolgokat figyelhetünk meg a képernyőn. 


Először megjelenik a C64 teljes jelkész¬ 
lete. Ezután abból hirtelen „szemét” 
lesz. Ezt követően igen szemléletesen az. 
orrunk előtt folyik a jelkészlet byte-ról 
byte-ra történő átmásolása. A futtatás 
után már nem tudjuk megállapítani, 
hogy nem az eredeti jelkészlettel, hanem 
egy másolattal van dolgunk. Márpedig a 
RAM-ban álló másolatot mostantól 
kezdve szívünk szerint módosíthatjuk. 

De valóban csak ennyi volna a kü¬ 
lönbség? Nem! Váltsunk csak át a meg¬ 
szokott <SH1FT> <CBM> gombokkal a 
kisbetű/nagybetű jelkészletre! A képer¬ 
nyőn ismét csak „szemét” jelenik meg. 
Ennek oka az, hogy a másolórutinunk 
csupán a nagybetű/grafikus jelek kosár¬ 
ból vette ki a karaktereket. Kapcsoljunk 
vi.ssza erre a jelkészletre. 

HOGYAN 
TÁROLJUK 
A JELEKET? 

Miután megteremtettük a lehetősé¬ 
get a jelkészlet módosításához, jöhet a 
következő kérdés: Hogy „készül” egy 
karakter? Aki a sprite cikket figyelem¬ 
mel kísért talán már adhat egy ötletet. S 
ez az ötlet használható is, mert a jelek a 
sprite-okhoz hasonlóan szerkeszthetők, 
csak kicsit egyszerűbben. 

Minden egyes karakter nyolc sorból 
áll, minden sorban nyolc pont van (1. áb¬ 
ra), amelyeket ki- vagy bekapcsolha¬ 
tunk. Például egy copyright karakter ké¬ 
pe a 2-cs ábrának megfelelően néz ki. 
Egy sor definiálásához egy számot kell 
megadni. A szám az adott bekapcsolt 
pontokhoz tartozó értékek összege lesz. 
Az első sor száma például így néz ki: 
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128 64 32 16 8 4 2 1 



2. ábra: 

A copyright 
karakter. 

Az ábra 

a bekapcsolt 

képpontokkal 

kitöltött 

mátrixot 

mutatja. 

A 

helyiértéknek 
megfelelő 
számok 
összege adja 
az adott sor 
számértékét 


























































2t2+2|3+2t4+2t5=4+8+16+32=60. a 
második sor száma 66 lesz (64+2) stb. 

£LÖ AZ ÚJ 
JELEKÉT 

Ha saját karaktereket akarunk ké¬ 
szíteni, előbb rajzolni kell egy 8x8-as 
mátrixot, majd a bekapcsolandó ponto¬ 
kat bejelöljük. A megfelelő értékek szá¬ 


mítása után nyolc, 0 és 255 közé eső szá¬ 
mot kell kapnunk (minden sorhoz 
egyet). Ezeket most a tároló megfelelő 
helyére kell vinnünk. De hogyan kapjuk 
meg a jó poziciót? 

A dolog innen nézve sem olyan ne¬ 
héz. Mint látjuk, minden jel nyolc darab 
1 byte-os számból „áll”. Eszerint tehát a 
megadott 8192-es címtől számítva min¬ 
den 8. helyen egy új karakter kezdődik. 
Epr karakter pozícióját tehát az alábbi 
kelettel határozhatjuk meg: 

karaktereim - kezdőcím + 8x karak- 
tcr.sorszám. 


Ha például a 33. karaktert (ez a fel¬ 
kiáltójel) akarjuk átdefiniálni, a fönti 
példa szerinti cím 8456 (8192+8x33) 
lesz. 

Ha ezt az egészet összefoglalva be¬ 
építjük a programunkba egy kis jelkész¬ 
let editort kapunk, amellyel a gépünk 
karaktereit tetszőlegesen alakíthatjuk; 

80 INPUT ”{home, 8xkurzor lejka- 
rakterkód; ”;Z 

90 PRINT 

100 FÓR T-0 TO 7:PRINT 
STR$(T)”.SOR”; 


KERESZTREJTVÉNY 


SZÁMÍ TÁSTECHNIKAl 
RÖVIDÍTÉSEK 

VÍZSZINTES: 2. Abnormal End 
(számítógépi program hibás leállása). 6. 
Binary Automatic Computer (korai 
USA-számítógép). 11. Auer Pál névje¬ 
gye. 13. Idegen pénznem. 15. Nem le. 16. 
MUdós Dénes név jele. 17. Legelő. 19. 
Van Uyen revízió is. 21. Kopasz. 22. Van 
ilyen mag is. 23. Folyó. 24. Redőny. 25. 
Kanidaz. 27. Bibliai alak. 29. Omladék. 
30. Ötórai ital. 32. Nem azt. 35. Brazíliai 
helység, környékéről mé^ ma is sok ér¬ 
deked cédrust, jacarandat és egyéb ne¬ 
mes fákat szállítanak a különféle ipará¬ 
gak számára. 36. E várost a legendás An- 
hanguera fia alapította 1727-ben. 38. 
Okozat szülője. 40. Amerikai Egyesült 
Államok röviden. 42. Liter páratlan be¬ 
tűi. 43. Olasz folyó. 44. Tisztít. 46. Haj¬ 
csomó. 48. Nem nőnemű. 49. Mezőgaz¬ 
dasági munkát végez. 50. Ivóedény." 52. 
Ilyen csend is van. 53. Tolsztoj neve. 54. 
Disznóölésnél fogyasztjuk. 55. Idegen 
szín. 57. Folyami hal. 60. M.M.M.M.M. 
62. Azonos a vízszintessel, csak egy betű 
hiányzik. 63. Római számok. 66. Lusták. 
69. Két szó: az Iránban használatos 
pénzegység, állóvíz. 71. Nép. 72. Állam, 
gazdaságának alapját a mezőgazdaság 
jelenti. 

FÜGGŐLEGES: 1. Content-Adres- 
sable RAM (számítógépi tártípus). 3. 
Nem szoros. 4. Dyn. 5. Németh Ernő 
név jele. 7. Monté Cristo várbörtöne volt. 
8. Tagadószó. 9. Rangjelző. 10. Számító- 
gépes optikai tároló. 12. Apostolfejede¬ 
lem, vértanú + 67.14. Electrically Alte- 
rable ROM (változtatható tartalmú szá¬ 
mítógépi tár). 16. Örlőüzem. 18. 
Lakoma. 19. Csak félig talpas. 20. Építé¬ 
szeti stílus. 21. Azonos a 18. függőleges¬ 
sel. 26. Lezuhanó. 28. Konyhai eszköz. 
30. ...chnitz, német könyvkiadó vállalat 


neve. 31_lanté, ezt a leányt egy medve 

nevelte az erdőben. 32. Szélharfa. 33. 
Szélesre nyit. 34. Common Algorithmic 
Language (számítógépes programnyelv). 
37. CompUcr Massachusetts Institute of 
Technology (számítógépi nyelv). 39. 
Ázsiai ország. 41. Formula Translator 
^zámítógépes programozási nyelv). 43. 
Elénk szín. 45. Maró anyag. 46. Bevásár¬ 
lóeszköz. 47. Eb eleség. 48. Van ilyen 
zárlat is. 50. Idegen cigarettamárka. 51. 


Vissza: névelős állat. 56. Egyforma be¬ 
tűk. 58. Tömlő. 59. Destructive Read- 
Out Store (számítógépes tároló törlő ki¬ 
olvasással). 60 Évszak. 61. Azonos a 25. 
vízszintessel. 63. Állófilm. 64. Vilmos, 
Lajos, Ottó. 65. Basic Operating System 
(számítógépi operációs rendszer). 67. 
Betű kimondva. 68. Ugyancsak betű ki¬ 
mondva. 69. Erel(!). 70. Tantál vegyjele. 

Mokos István 
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120 INPUT M 

130 POKE 8192+8*Z+T.M 

140 NEXT 


(A kapcsos zárójel azt jelenti, hogy 
az idézőjelben a home, és nyolcszor a 
kurzor le gombot nyomjuk meg!) 

A 80. sorban megkérdezzük a meg¬ 
változtatandó jel sorszámát. Ezt a C64- 
es kézikönyvéből olvashatjuk ki. A 
100—140. sorok egy beviteli hurkot ad¬ 
nak, ahol sorról sorra meg kell adni az 
adott karakter megfelelő számértékeit. 
A „+T” a 130. sorban azért szerepel, 
mert most nem a kezdőcímet, hanem a 
teljes 8 byte értéket kell bevinni. 


Kurzorvezérlés 


Ha a definiálást több karakterrel is 
meg akarjuk ismételni, szúrjuk be a kö¬ 
vetkező sort: 150 GOTO 80 

Innentől kezdve tetszőleges karakte¬ 
rek áttervezése lehetséges. A minieditor 
elhagyásához a STOP gombot nyomjuk 
meg. Ez csak akkor lesz hatásos, ha a 
program nem épp egy INPUT-ra vár (ott 
a STOP nem működik). A mostani mód¬ 
szerrel csak arra lesz lehetőségünk, hogy 
az elkészített jelkészletet azon melegé¬ 
ben használjuk. Aaz INPUT-ok nélküli, 
saját programjainkba való használathoz 
célszerű az értékeket kiolvasni és ki¬ 
menteni, hogy azután beolvasva vagy 
DATA sorokba rakva a rendelkezésünk¬ 
re álljanak. A szerkesztéshez sok sikert! 


Miért csak a billentyűről vezéreljük 
a Kurzort? Próbáljuk meg a 2-es portba 
csatlakoztatott joystickkel! Ehhez ad¬ 
juk be a listát, amit a SYS 49152-vcl le¬ 
het aktivizálni. 


TIPPEK-TRÜKKÖK I 

Meglepő 

színátmenet 

A VDC technikáját nézve a C128 
csupán nyolc színt képes két tónusban 
megjeleníteni. A 1901-es monitorral 
azonban érdekes dolgot figyelhetünk meg: 

1 COLOR 6,2:COLOR 5,5 

2 PRINT CHR$(27)”R"CHR$(147): 
SYSDEC (”CDCC”). 110,35 

Indítsuk el a programot. Ha a képer¬ 
nyőn lUa háttér és fehér keret jelentke¬ 
zik, növeljük egyenként a 110 értéket. 
Ha viszont holli^eketére vált a kép, csök¬ 
kentsük azt. Ehhez előbb ki keU szálinunk 
a <RUN/STOP> <RESTORE>-ral a sö¬ 
tétből. Egy adott értéknél (nálam ez a 
107-es volt) egyszerre megdöbbentő fe¬ 
kete/fehér/lila színátmenet kerül a sze¬ 
münk elé. Ez a jelenség a 1081-es vagy 
a 1084-es monitorral egyáltalán nem je¬ 
lentkezik. A jelenség magyarázatát a 
mai napig nem találtuk. 



C128-as 
tippek, trükkök 


Bankból bankba 

A Cl 28-as kézikönyvében leírt 
FETCH, STASH és SWAP utasítások 


csak az 1700,1764 és az 1750-es memó¬ 
riabővítőkkel használhatók. Viszont ak¬ 
kor ho^an tudunk adatokat cserélgetni 
a meglevő bankok (0,1,14 és 15) között? 
Főleg az 1-es bank, a változók területe 
áll sokszor kihasználatlanul, s kínál így 
a programozónak használható memóri¬ 
aterületeket fontos adatok (képernyők, 
jelkészJetek, segédszövegek stb.) köztes 
tárolására. Erre a célra a C128 operáci¬ 
ós rendszere két rutint ad: 

$FF74 (65396) olvasás egy tároló¬ 
bankból, 

$FF77 (65399) írás egy bankba. 


Ehhez csupán két címregisztert kell 
a nulláslapon high és low címbyte-ként 
definiálni. A bankszámot az X regiszter 
tartalmazza. A mellékelt Banktransfer 
program például kiolvassa a 14-es bank¬ 
ban álló eredeti jelkészlet első 256 byte- 
ját ($D000), majd azt az 1-es bankba a 
$1000-res területre írja. A nulláslapmu- 
tatókat és az X regisztert az alábbiak 
szerint definiáljuk: 

Rutin Terület Mutató X Regiszter 

$FF74 $D000 $FA/FB 14 
$FF77 $1000 $FC/FD 01 
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TIPPEK - TRÜKKÖK 


Az olvasási művelet alatt ($FF74) a 
megfelelő mutató low byte-jának (a mi 
esetünkben $FA) kell az aldoimulátor- 
ban állni, az írási terület címének meg¬ 
felelő byte-ját (itt $FC) viszont egy erre 
kijelölt címre kell írni. Ez a cím a $02B9. 
A mi programunkban a célcím a 
$1301/$ 1305 cellákban áll. A forráscí¬ 
met a $1308/$ 1300-ba írtuk. A forrás¬ 
bank szám a $1311-es, a célbanké a 
$13IF cellába került. 


Név : Banktransfer 13(X)-1329 

1300 ; a9 00 85 fc a9 10 85 fd 
1308 : a9 00 85 fa a9 dO 85 fb 
1310 : aO 00 a9 fc 8d b9 02 a9 

1318 : fa a2 Oe 20 74 ff a2 01 

1320 : 20 77 ff c8 cO 00 dO ea 

1328 : 60 20 6b 13 4c 7a 13 60 


C128-as zene 

Zeneszámokat komponálni a 128- 
assal? Sajnos ez nem megy. A Song- 
player program azonban hajlandó a 64- 
esnél már jól ismert Soundmonitor ze¬ 
néit 128-as módban lejátszani. A trükk 


nem is olyan bonyolult. A lejátszórutin 
a 64-es környezetet találja a munka so¬ 
rán. Ehhez a zenerutin meghívása előtt 
bekapcsoljuk a be/kiviteli területet (és 


ezzel a zenechipet). Mostantól a gyors 
lemezes rutinokkal hívhatjuk, s a saját 
üzemmódban hallgathatjuk a Soundmo¬ 
nitor zenéit. 
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RÉM 

SONEÍPLAVER 
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MATA 

” A9”' ,"'3E” 

2 

DATA 

"•ÖD"- ,”©©•” 

3 

DATA 

”4Cr”' ,”1F^"' „'■'C©"' 

4 

DATA 


IfiCjl 

DATA 

"SD” ,"'FF” 

6 

DATA 

”'4C”',”'65”',™'F A™ 
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DATA 

”A9”,”3E” 

8 

DATA 

”'8d” ,”©©” ,”FF” 
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DATA 

”2©”',”'©©” ,”e:©- 


:l€* 

11 
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1-4 
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FOIR I- 

f»oik:e: 

NEXr 

POKE 

POKE 

F»OICE 

f»OK:E 


=» TO 24 

;dec<’''13c>«|'’ 


■>+l,BiEC<A-'»f> 


.DEC< ”''C0'14™' > jDECX ”13"" > 
BECC > jDECÍ > 

IJECC ^'^C'Í3'32’'’ > *BEC< > 

DECC ”'C«>33” > ,DEC< > 

EíVSBECX ”'131«5''' > 
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lO' REH NEW COLORS 

2©' GRiPliF*HIC 5,1 

3© RS=DEC<”’CDCC"'> : BANK 
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Sok a 80 karakter 

A televíziókon egy sorban 80 karak¬ 
tert nehezen lehet elolvasni. A 64-es 
normál karakterei szintén lehetnének 
jobbak. A „40 karakter” program a 
VDC képernyőt (duplaszéles) 40 karak¬ 
teres m^usba kapcsolja. 

Emellett pedig még a színlehetősége¬ 
ink is bővülnek. A New Colors (az előző 
kicsit módosított változata) ugyanis a 
„normál” 16 szín mellett másokat kínál. 
De ne feledjük, hogy vagy a régi, vagy az 
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4© SVS EíS,64,© 

5© SVEÍ RS,4©,1 

6© SVS RS,53,2 

7© SVS RS,:l37,22 

8© SVS RS,87,25 

9© SVS RS,4©,27 

1©© WINOOUII ©,©,38,24 

11© SVS RS,©,34 

1.2© SVS: RS,Ö©,35 

13© COLOR 6,11 : COLOR 5, 


1 © 
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új színek állnak rendelkezésre. Húzjícunk 
minden színbillentyűvel inverz csíkokat, 
majd játsszunk el a COLOR 6,x utasí¬ 
tással. A hatás lenyűgöző! 
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1© RÉM 


4© KARAKTER 


2© GRAPHIC 5,1 
3© RS=1JEC<;”CDCC’ 
4© SVS RS,64,© 
5© SVS RS,4©,1 
6© SVS RS,53,2 
7© SVS RS,13T,22 
8© SVS RS,87,25 
9© SVS RS,4©,27 
1©© WINDOW 
11© SVS RS,©,34 
12© SVS RS,55,35 


BANK 15 
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AMIGA TULAJDONOSOK 
FIGYELMÉBE !!! 

Egyesületünk 

— a hazai amiaások igényeinek 
jobb kielégítésére — 
tervezi, hogy különböző 
kiegészítő egységeket forgalmaz. 

Ennek első darabja 
az AMIGA 500 típusú gépekhez való 
memóriabővítő (0,5 Mbyte), 
Várható ára: 12000 Ft körűi iesz, 
ameiyből az egyesület tagjai 
10—15% árkedvezményt kaphatnak. 

Kérjük kedves tagjainkat, oivasóinkat, 
hogy ez irányú igényeiket Juttassák ei az 
egyesület címere: 

Országos Commodore Egyesület 
1388 Budapest, 

Pf.: 86 
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SSSfllSSS 

szeptemberi 

200 forintos 

vásárlási utalvány 

Beváltható készpénzes vásárlás 
esetén a Kopi-Kernél 
Budapest V., Kálmán Imre u. 27. 

Budapest XI., BajtrxScl u. 11—13. 

Telefon: 132-2544,132-4342, 111-2083 

Érvényes: 1990. december 20. 


MAKROVILÁG 

utazási Iroda 

Beváltható 

utazás megrendelése esetén 

az üllői úti főirodában az alábbiak szerint: 

5 000 Ft-lg — 200 Ft kedvezmény 

10 000 Ft-lg — 400 Ft kedvezmény 

20 000 Ft-lg — 500 Ft kedvezmény 

20 000 Ft felett — 1000 Ft kedvezmény 
Csoportok Jelentkezése esetén további 
kedvezményekről az irodában lehet tárgyalni 



OKTÓBER 
60 Ft-OS^i 

vásárlási utalvány 

Beváltható^észpénzps 
vásárlás esetén a 2C’ 
áruházban XIII., Balzac u. 35. 
és a Művelt Nép 

vidéki boltjaiban működő 2C sarkokban. 

Érvényes: 1990. november 30-lg 
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60 Ft-OS 

vásárlási utalvány 

Beváltható készpénzes 
vásárlás esetén az 
APISZ szaküzleteiben 
XI., Budafoki út 7. 

Vili., Szigony u. 15. 

Érvényes: 1991. Január 31 -ig 


.^Yósr:- 
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A NOVOTRADE RT. 2C Áruházában 

10 % kedvezménnyel 

vásárolhatják meg a következőket: 


Antenna átkapcsoló 

490 Ft 

Alapismereti kislexikon 

290 Ft 

Enterprise Romvisszafejlesztós 

260 Ft 

IS-DOS Enterprise 

150 Ft 

Baumgartner: Turbo Pascal 

290 Ft 


Az Országos Commodore Egyesület új szolgáltatásai; 


C-16, C-116 memóriájának bővítése 64 kByte-ra; 3 500 Ft 

C-16 belső 16 kByte-os EPROM bővítés: 1 450 Ft 

C-16 belső 32 kByte-os EPROM bővítés: 2 900 Ft 

C-16 belső 8 kByte-os SOFT-ROM: 2 800 Ft 


C-16 és 1541 kompatibilis lemezegység párhuzamosítása: 3 200 Ft 
+4 és 1541 kompatibilis lemezegység párhuzamosítása: 1 450 Ft 

1541 kompatibilis lemezegység 8 kByte-os RAM bővítése: 3150 Ft 
C-16, C-116. +4 külső EPROM ós/vagy 

SOFT-ROM modul: kiépítésétől függő. 

Az EPROM-ba hozott progranrot vagy a már kész menük valamelyikét 
építjük be (bekapcsoláskor és RESET-kor automatikusan Indul, nem 
törlődik). A SOFT ROM tetszőleges EPROM menü futtatására alkalmas 
(RÉSÉT védett). 

A fenti bővítések megrendelhetők az O.C.E. irodájában szeptember 
13-tól, kéthetente csütörtökön 17—19 óra között. 

Árainkat az alkatrészárak változásai befolyásolhatják. 


A Fotoelekironik-Novotrade KFT az alább felsorolt szervizeiben mindenféle 
szervizszolgáltatás munkadijából 10% kedvezményt ad az egyesületi tagoknak. 
Határidő: nincs. 


A kedvezményt nyújtó szervizeink: 

1053 Budapest, Magyar u. 12—14. Telefon: 1-173-551 

1083 Budapest, Szigony u. 9. Telefon: 1-343-153 

1191 Budapest, Gábor Á. sétány 3. Telefon: 1-274-763 
3525 Miskolc, Fazekas u. 1—3. Telefon: 46-17-011 

4034 Debrecen, Holló L. u. 14. Telefon: 52-32-863 

5600 Békéscsaba, Bartók B. u. 37. Telefon: 66-27-195 
6724Szeged, Csongrádi sugárút 76. Telefon: 62-13-377 
7624 Pécs. Jurisics M. u. 17. Telefon: 72-11-812 

8000 Székesfehérvár, Széchenyi u. 15/a. Telefon: 22-12 711 
9700 Szombathely, Szalonok u. 31. Telefon: 94-13-419 



Felvevőhelyek: 

7400 Kaposvár, Május 1. u. 21. Telefon: 82-17-503 

9024 Győr, Bem J, tér 1. Telefon: 96-12-802 

6000 Kecskemét, Széchenyi tér 1—3. Telefon: 76-23-720 

Igazolás; a javítandó berendezés leadásakor egyesületi igazolvánnyal. 
A kedvezmény többször is igénybe vehető. 
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EGY JÓNEVÚ SZERVÍZHÁLÓZATRA ÉPÜLŐ KOMPLEX SZOLGÁLTATÓHÁZ. 

A CÉG KETTŐS KIRENDELTSÉGI HÁLÓZATTAL RENDELKEZIK 
A SZÁMÍTÁSTECHNIKAI. VALAMINT AZ IRODAGÉPES SZOLGÁLTATÁSOK 

MEGVALÓSÍTÁSÁHOZ. 

TEVÉKENYSÉGI KÖRÉBE TARTOZIK: 

SZÁMÍTÁSTECHNIKAI SW/HW FEJLESZTÉS ÉS SZERVIZ, 
IRODAGÉPES FEJLESZTÉS ÉS SZERVIZ, 

ELEKTRONIKAI ESZKÖZÖK FORGALMAZÁSA. 

SZAKMAI KONZULTÁCIÓ, KÜLKERESKEDELEM: 



EZ A PROFESSZIÓNÁL RT.I 


Számítástechnikai és Kereskedelmi RT. 
Kaszásdűlő u. 5. 

Telefon: 187-03-48,167-00-24 
Telefax: 167-02-89 
Kereskedelmi iroda: 188-43-68 
Vevőszolgálat: 188-61-01 
168-62-30 
188-43-56 























